home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #5 / Amiga Plus CD - 2000 - No. 5.iso / install / AHI / Install AHI < prev    next >
Text File  |  2000-01-01  |  77KB  |  2,599 lines
  1. ; $VER: AHI Install 4.13 (8.10.97)
  2. ; Description: Installer script for the AHI audio system (© 1996, 1997 Martin Blom).
  3. ; Done my Martin Blom, partly based on Teemu Suikki's install script.
  4. ; Public domain.
  5. ;
  6. ; $Id: Install\040AHI,v 4.14 1997/11/02 02:01:29 lcs Exp lcs $
  7. ; $Log: Install\040AHI,v $
  8. ; Revision 4.14  1997/11/02 02:01:29  lcs
  9. ; Added Concierto.
  10. ;
  11. ; Revision 4.13  1997/10/09 01:08:49  lcs
  12. ; Added the language Hrvatski.
  13. ;
  14. ; Revision 4.12  1997/09/28 04:36:32  lcs
  15. ; Added Maestro Pro
  16. ;
  17.  
  18. (set #complete 0)
  19. (set #completeadd (/ 1000 35))    ; There are 35 complete statements!
  20.  
  21. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  22.  
  23. (set #osversion (/ (getversion "exec.library" (resident)) 65536))
  24.  
  25. ;**
  26. ;** All the strings
  27. ;**
  28.  
  29.     (set #t_welcome        (cat
  30.         " Welcome to the AHI installation. AHI is a retargetable"
  31.         " audio systems that can be used with both the built-in"
  32.         " sound chip (Paula) and several sound cards. This is version"
  33.         " 4."
  34.     ))
  35.     (set #t_oldinstaller    (cat
  36.         " You have an old version of the Installer. I'll probably"
  37.         " need version 43.3 or greater. You can continue anyway"
  38.         " but there is no guarantee it will work as it's supposed"
  39.         " to do.\n"
  40.         " Do you wish to continue anyway?"
  41.     ))
  42.     (set #t_oldinstallerhelp (cat
  43.         " The version of Installer you use is too old. You can"
  44.         " find a more recent version on the Internet, for example"
  45.         " on Aminet, in the util/misc directory. The current"
  46.         " file name is \"Installer-43_3.lha\":\n"
  47.         " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  48.     
  49.     ))
  50.     (set #t_installaborted    "Installation aborted.")
  51.  
  52.     (set #t_installing    "Installing ")
  53.     (set #t_installingdocs    "Installing developer documentation")
  54.     (set #t_installingincs    "Installing include files")
  55.     (set #t_installingsrc    "Installing example source code")
  56.     (set #t_nofiles        "No files to install.")
  57.  
  58.     (set #t_nohelp        "No help available.")
  59.  
  60.     (set #t_parts        "Which parts of AHI do you wish to install?")
  61.     (set #t_system        "System files")
  62.     (set #t_prefs        "Preferences program")
  63.     (set #t_audio        "The AUDIO handler");
  64.     (set #t_userdoc        "User's documentation")
  65.     (set #t_a-developer    "Application developer files")
  66.     (set #t_d-developer    "Driver developer files")
  67.     (set #t_userhelp    (cat
  68.         "System files:\n"
  69.         " The system files. This is the heart of AHI and must be"
  70.         " if for any of the other components to work.\n\n"
  71.         "Preferences program:\n"
  72.         " The preference program. Can be used to change many options"
  73.         " in AHI. This part of AHI requires BGUI or MUI to be installed.\n\n"
  74.         "The AUDIO handler:\n"
  75.         " Allows you to play and record samples with the 'copy'"
  76.         " command.\n\n"
  77.         "User's documentation:\n"
  78.         " An AmigaGuide® file descibing the AHI audio system and"
  79.         " its components.\n\n"
  80.     ))
  81.     (set #t_devhelp        (cat
  82.         "Application developer files:\n"
  83.         " Autodocs, include files, example source code etc."
  84.         " Required if you wish to use AHI in your own applications.\n\n"
  85.         "Driver developer files:\n"
  86.         " Autodocs, example source code etc. Only required"
  87.         " if you plan to write hardware drivers for sound"
  88.         " cards.\n\n"
  89.     ))
  90.  
  91.     (set #t_gui        (cat
  92.         " Which version of the preferences program would you like"
  93.         " to install?"
  94.     ))
  95.     (set #t_guihelp        (cat
  96.         " Please select which GUI system you prefer.\n\n"
  97.     ))
  98.     (set #t_guibgui        "BGUI version")
  99.     (set #t_guimui        "MUI version")
  100.  
  101.     (set #t_icon         "Which icon do you want to install?")
  102.     (set #t_iconstd        "Plain 4 colour icon")
  103.     (set #t_iconmwb        "8 colour MagicWB icon")
  104.     (set #t_iconhelp    (cat
  105.         " Select which icon you would like to use for the prefernces"
  106.         " program. The MagicWB icon was designed by Erol Ismael.\n\n"
  107.     ))
  108.  
  109.     (set #t_languages    (cat
  110.         "Which languages do you want to install?"
  111.         " The built-in language is English."))
  112.     (set #t_languageshelp    (cat
  113.         " If your language is not in the list, the author of AHI"
  114.         " would be very happy if you made a translation. Edit the files"
  115.         " User/Catalogs/ahi.ct and User/Catalogs/ahiprefs.ct"
  116.         " and send it to this address:\n"
  117.         " lcs@lysator.liu.se\n"
  118.         " It may be a wise move to ask first, just to make sure nobody"
  119.         " else is working on a translation to your language.\n\n"
  120.     ))
  121.  
  122.     (set #t_drivers        (cat
  123.         "Which AHI drivers you want to install?"
  124.         " Do not install drivers for sound cards you don't have."))
  125.     (set #t_drivershelp    (cat
  126.         "Concierto:\n"
  127.         " Concierto sound card.\n\n"
  128.         "Delfina:\n"
  129.         " Delfina Classic/Lite sound card.\n\n"
  130.         "Filesave:\n"
  131.         " Read/Write sample data to a file.\n\n"
  132.         "Maestro Pro:\n"
  133.         " Maestro Pro sound card.\n\n"
  134.         "Melody MPEG:\n"
  135.         " Melody MPEG sound card.\n\n"
  136.         "Paula:\n"
  137.         " Regular Amiga sound hardware.\n\n"
  138.         "Prelude:\n"
  139.         " Prelude sound card.\n\n"
  140.         "Toccata:\n"
  141.         " Toccata sound card.\n\n"
  142.         "Wavetools:\n"
  143.         " Wavetools sound card.\n\n"
  144.     ))
  145.  
  146.     (set #t_CPUver        "Which version of the binaries do you wish to install?")
  147.     (set #t_CPUverhelp    (cat
  148.         " 68020-optimized binaries are much faster, and often also"
  149.         " smaller than plain 68000 versions. In the case of AHI,"
  150.         " the 68000 versions have less features and reduced sound"
  151.         " quality. It is strongly suggested that you use the"
  152.         " 68020 versions of the binaries.\n"
  153.                 " The 68060 version avoids the slow 64 bit divisions. Don't"
  154.                 " install this version unless you own a 68060 CPU!\n\n"
  155.     ))
  156.  
  157.     (set #t_devfiles    "Which developer files do you wish to install?")
  158.     (set #t_devdocs        "Autodocs and AHI Developer's Guide")
  159.     (set #t_source        "Example source code")
  160.     (set #t_asm        "Assembler include files")
  161.     (set #t_cgen        "Generic C include files")
  162.     (set #t_e        "E module files")
  163.     (set #t_fd        "FD files")
  164.     (set #t_ade        "Extra ADE gcc include files")
  165.     (set #t_sas        "Extra SAS/C (and DICE) include files")
  166.     (set #t_storm        "Extra StormC include files")
  167.     (set #t_devfileshelp    (cat
  168.         "Autodocs and AHI Developer's Guide:\n"
  169.         " The autodocs and rules for programming AHI.\n\n"
  170.         "Example source code:\n"
  171.         " Some example programs, most of them are written in C, but"
  172.         " there are some assembler sources too.\n\n"
  173.         "Assembler include files:\n"
  174.         " Include files needed if you program in assembler.\n\n"
  175.         "Generic C include files:\n"
  176.         " Include files needed if you program in C.\n\n"
  177.         "E module files:\n"
  178.         " The module files to use with AmigaE.\n\n"
  179.         "FD files:\n"
  180.         " Can be used with the 'lvo' tool, or when you build a"
  181.         " hardware driver written in C.\n\n"
  182.         "Extra ADE gcc include files:\n"
  183.         " The special include files for gcc (inline, proto etc).\n\n" 
  184.         "Extra SAS/C (and DICE) include files:\n"
  185.         " The special include files for SAS/C (pragmas, proto etc)."
  186.         " They work with DCC too, but with no tag calls.\n\n"
  187.         "Extra StormC include files:\n"
  188.         " The special include files for StormC (pragma, proto etc).\n\n"
  189.     ))
  190.  
  191.  
  192.     (set #t_nodevs
  193.         "Cannot find the Devs: assign. Try a higher userlevel instead.")
  194.     (set #t_noc
  195.         "Cannot find the C: assign. Try a higher userlevel instead.")
  196.     (set #t_noprefs
  197.         "Cannot find the Sys:Prefs directory. Try a higher userlevel instead.")
  198.     (set #t_nol
  199.         "Cannot find the L: assign. Try a higher userlevel instead.")
  200.     (set #t_devspath    "Where do you want to install the system files?")
  201.     (set #t_devspathhelp    (cat
  202.         " The directory you select must be a part of your Devs: assign."
  203.         " The installer will copy ahi.device, the hardware drivers"
  204.         " and the audio mode description files to this directory."
  205.         " Subdirectories for the drivers and mode files will be"
  206.         " created.\n\n"
  207.     ))
  208.     (set #t_cpath        "Where do you want to install AddAudioModes?")
  209.     (set #t_cpathhelp    (cat
  210.         " AddAudioModes is a small command line utility that can"
  211.         " be used to manipulate the database which contains the"
  212.         " audio modes (much like the screenmode database)."
  213.         " CLI programs are normally located in the C: directory.\n\n"
  214.     ))
  215.  
  216.  
  217.     (set #t_localepath    "Where do you want to install the catalogs?")
  218.     (set #t_localepathhelp    (cat
  219.         " The directory you select must be a part of your Locale: assign."
  220.         " The installer will copy the catalogs you have selected to"
  221.         " subdirectories in this directory.\n\n"
  222.     ))
  223.  
  224.     (set #t_prefspath    "Where do you want to install the preferences program?")
  225.     (set #t_prefspathhelp    (cat
  226.         " The preferences program lets you configure AHI for your particular"
  227.         " configuration. You can select which sound hardware you prefer"
  228.         " to use, which physical inputs and outputs you wish to use"
  229.         " etc. Preferences programs are normally located in the"
  230.         " Sys:Prefs/ directory.\n"
  231.         " This program requires BGUI or MUI, depending on which version"
  232.         " you are installing.\n\n"
  233.     ))
  234.  
  235.     (set #t_audiohelp    (cat
  236.         " The AUDIO handler is used to mount a device called AUDIO:. By"
  237.         " copying files to and from this device, you can play and record"
  238.         " raw sample data, IFF-AIFF or IFF-AIFC files.\n\n"
  239.     ))
  240.  
  241.     (set #t_lpath        "Where do you want to install the AUDIO handler?")
  242.     (set #t_lpathhelp    (cat
  243.         #t_audiohelp
  244.         " Handlers are normally located in the L: directory.\n\n"
  245.     ))
  246.  
  247.     (set #t_dosdevpath    "Where do you want to install the AUDIO mount entry?")
  248.     (set #t_dosdevpathhelp    (cat
  249.         #t_audiohelp
  250.         " Mount entries are normally located in the Devs:DOSDrivers"
  251.         " directory if they are to be mounted at boot time. If not, they"
  252.         " probably are in the SYS:Storage/DOSDrivers directory.\n\n"
  253.     ))
  254.  
  255.     (set #t_dosdriver    "Do you want the handler to be activated at boot time?")
  256.     (set #t_dosdriverhelp    (cat
  257.         " If you want, the AUDIO: device can be made avaliable as soon as"
  258.         " your system has been started. This saves you the effort of"
  259.         " having to mount it manually when you want to use it. It does"
  260.         " not require much memory to mount the device and it is therefor"
  261.         " suggested that you select 'Yes'.\n\n"
  262.     ))
  263.  
  264.     (set #t_userdocpath    "Where do you want to install the user documentation?")
  265.     (set #t_userdocpathhelp    (cat
  266.         " This is an AmigaGuide® file descibing the AHI audio system"
  267.         " and its components.\n\n"
  268.     ))
  269.  
  270.     (set #t_srcpath        (cat
  271.         " Where do you want to install the example source code?"
  272.         " A directory called AHI will be created there."
  273.     ))
  274.     (set #t_srcpathhelp    (cat
  275.         " The example sources, in both C and assembler, will be"
  276.         " stored in a subdirectory called AHI. Any files currently"
  277.         " present in the AHI directory will be deleted!\n\n"
  278.     ))
  279.     (set #t_oldsrc        (cat
  280.         " There is already a directory called AHI here."
  281.         " All files in it will be deleted."
  282.     ))
  283.  
  284.     (set #t_devdocspath    " Where do you want to store the developer documentation?")
  285.     (set #t_devdocspathhelp    (cat
  286.         " The installer will place the autodoc files and the"
  287.         " AHI Developer's Guide in the directory you select.\n\n"
  288.     ))
  289.  
  290.     (set #t_aincpath    " Where are your assembler include files located?")
  291.     (set #t_aincpathhelp    (cat
  292.         " The installer will place the assembler include files"
  293.         " in subdirectories (lvo, devices and libraries)"
  294.         " of the one you select.\n\n"
  295.     ))
  296.  
  297.     (set #t_fdpath        " Where do you keep your FD-files?")
  298.     (set #t_fdpathhelp    (cat
  299.         " FD-files are files describing a library's or a device's"
  300.         " functions. They can be used with the 'lvo' program, and"
  301.         " can also be useful if you write hardware drivers.\n\n"
  302.     ))
  303.  
  304.     (set #t_cincpath    " Where are your C include files located?")
  305.     (set #t_cincpathhelp    (cat
  306.         " The installer will place the generic C include files"
  307.         " in subdirectories (clib, devices and libraries)"
  308.         " of the one you select.\n\n"
  309.     ))
  310.  
  311.     (set #t_emodpath    " Where are your E module files located?")
  312.     (set #t_emodpathhhelp    (cat
  313.         " The installer will place the E module files in the directory"
  314.         " and in subdirectories (devices and libraries)"
  315.         " of the one you select.\n\n"
  316.     ))
  317.  
  318.     (set #t_adeincpath    " Where do you want to place the ADE gcc include files?")
  319.     (set #t_adeincpathhelp    (cat
  320.         " gcc needs some extra files to find out which registers"
  321.         " to use when calling AHI functions. That information is"
  322.         " located in these files, which will be copied to the"
  323.         " inline, pragmas and proto directories.\n\n"
  324.     ))
  325.  
  326.     (set #t_sasincpath    " Where do you want to place the SAS/C (and DICE) include files?")
  327.     (set #t_sasincpathhelp    (cat
  328.         " SAS/C (and DICE) needs some extra files to find out which registers"
  329.         " to use when calling AHI functions. That information is"
  330.         " located in these files, which will be copied to the"
  331.         " pragmas and proto directories.\n\n"
  332.     ))
  333.  
  334.     (set #t_stormincpath    " Where do you want to place the StormC include files?")
  335.     (set #t_stormincpathhelp (cat
  336.         " StormC needs some extra files to find out which registers"
  337.         " to use when calling AHI functions. That information is"
  338.         " located in these files, which will be copied to the"
  339.         " pragma and proto directories.\n\n"
  340.     ))
  341.  
  342.     (set #t_ahidevhelp    (cat
  343.         " ahi.device is the heart of the AHI"
  344.         " audio system. This is the only part"
  345.         " that other programs knows anything about.\n\n"
  346.     ))
  347.  
  348.     (set #t_runaddmodes    (cat
  349.         " About to run AddAudioModes to recreate"
  350.         " the audio modes database."
  351.     ))
  352.  
  353.  
  354.     (set #t_overwritemode1
  355.         " There is already a copy of the audio mode descriptor ")
  356.     (set #t_overwritemode2 " present in ")
  357.     (set #t_overwritemode3    (cat
  358.         ".\n\n"
  359.         " Do you want to overwrite it?"
  360.         " All changes you have done to to it will be lost!"
  361.     ))
  362.  
  363.  
  364. (if (= @language "srpski")
  365. (    ; Translated by Ljubomir Jankovic <lurch@afrodita.rcub.bg.ac.yu>
  366.     (set #t_welcome        (cat
  367.         " Dobrodoãli u AHI instalaciju. AHI je retargetable"
  368.         " audio sistem koji moäe biti koriãáen sa ugraâenim"
  369.         " zvuànim àipom (Paula) i viãe zvuànih kartica."
  370.         " Ovo je verzija 4."
  371.     ))
  372.     (set #t_oldinstaller    (cat
  373.         " Vi imate staru verziju Installer-a. Verovatno áe mi"
  374.         " trebati verzija 43.3 ili viãa. Moäete nastaviti, ali"
  375.         " nema garancije da áe sve raditi kako je predviâeno.\n"
  376.         " Da li stvarno äelite da nastavite?"
  377.     ))
  378.     (set #t_oldinstallerhelp (cat
  379.         " Verzija Installer-a koju koristite previãe stara. Moäete"
  380.         " naái najnoviju verziju na Internetu, na primer"
  381.         " na Aminet-u, u direktorijumu util/misc. Trenutno ime"
  382.         " fajla je \"Installer-43_3.lha\":\n"
  383.         " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  384.  
  385.     ))
  386.     (set #t_installaborted    "Instalacija prekinuta.")
  387.  
  388.     (set #t_installing    "Instaliram ")
  389.     (set #t_installingdocs    "Instaliram dokumentaciju za programere")
  390.     (set #t_installingincs    "Instaliram include fajlove")
  391.     (set #t_installingsrc    "Instaliram primere izvornog koda")
  392.     (set #t_nofiles        "Nema fajlova za instaliranje.")
  393.  
  394.     (set #t_nohelp        "Pomoá nije dostupna.")
  395.  
  396.     (set #t_parts        "Koje delove AHI-ja äelite de instalirate?")
  397.     (set #t_system        "Sistemske fajlove")
  398.     (set #t_prefs        "Program za podeãavanja")
  399.     (set #t_audio        "AUDIO hendler");
  400.     (set #t_userdoc        "Korisniàka dokumentacija")
  401.     (set #t_a-developer    "Fajlovi za razvoj aplikacija")
  402.     (set #t_d-developer    "Fajlovi za razvoj drajvera")
  403.     (set #t_userhelp    (cat
  404.         "Sistemski fajlovi:\n"
  405.         " Ovo je srce AHI-ja i mora postojati"
  406.         " da bi radile ostale komponente.\n\n"
  407.         "Program za podeãavanja:\n"
  408.         " Moäe se koristiti za podeãavanje mnogih opcija"
  409.         " AHI-ja. Ovaj deo AHI-ja zahteva da se instalira BGUI.\n\n"
  410.         "AUDIO hendler:\n"
  411.         " Omoguáava Vam da puãtate i snimate semplove komandom"
  412.         " 'copy'.\n\n"
  413.         "Korisniàka dokumentacija:\n"
  414.         " AmigaGuide® fajl koji opisuje AHI audio sistem i"
  415.         " njegove komponente.\n\n"
  416.     ))
  417.     (set #t_devhelp        (cat
  418.         "Fajlovi za razvoj aplikacija:\n"
  419.         " Autodokovi, include fajlovi, primeri izvornog koda itd."
  420.         " Oni su neophodni ako äelite da koritite AHI u svoji aplikacijama.\n\n"
  421.         "Fajlovi za razvoj drajvera:\n"
  422.         " Autodokovi, primeri izvornog koda itd. Potrebni su"
  423.         " samo ako planirate da razvijate hardverske drajvere za"
  424.         " zvuàne kartice.\n\n"
  425.     ))
  426.  
  427.  
  428.     (set #t_languages    (cat
  429.         "Koje jezike äelite da instalirate?"
  430.         " Ugraâeni jezik je Engleski."))
  431.     (set #t_languageshelp    (cat
  432.         " Ako se Vaã jezik ne nalazi na listi, autor AHI-ja"
  433.         " bi bio veoma sreáan, ako bi napravili prevod. Promenite fajlove"
  434.         " User/Catalogs/NewCatalog.ct i User/Catalogs/NewPrefsCatalog.ct"
  435.         " i poãaljite na ovu adresu:\n"
  436.         " lcs@lysator.liu.se\n\n"
  437.     ))
  438.  
  439.     (set #t_drivers        (cat
  440.         "Koje AHI drajvere äelite da instalirate?"
  441.         " Najbolje je da instalirate samo drajvere koji su Vam potrebni."))
  442.     (set #t_drivershelp    (cat
  443.         "Concierto:\n"
  444.         " Concierto zvuàna kartica.\n\n"
  445.         "Delfina:\n"
  446.         " Delfina Classic/Lite zvuàna kartica.\n\n"
  447.         "Filesave:\n"
  448.         " Àitanje/zapis zvuànih podataka u fajl.\n\n"
  449.         "Maestro Pro:\n"
  450.         " Maestro Pro zvuàna kartica.\n\n"
  451.         "Melody MPEG:\n"
  452.         " Melody MPEG zvuàna kartica.\n\n"
  453.         "Paula:\n"
  454.         " Obiàan Amigin zvuàni hardver.\n\n"
  455.         "Prelude:\n"
  456.         " Prelude zvuàna kartica.\n\n"
  457.         "Toccata:\n"
  458.         " Toccata zvuàna kartica.\n\n"
  459.         "Wavetools:\n"
  460.         " Wavetools zvuàna kartica.\n\n"
  461.     ))
  462.     (set #t_CPUver        "Koju verziju programskih fajlova äelite da instalirate?")
  463.     (set #t_CPUverhelp    (cat
  464.         " Fajlovi optimizovani za 68020 su bräi, i obiàno"
  465.         " manji nego njihove 68000 verzije. U sluàaju AHI-ja,"
  466.         " verzije za 68000 imaju manje moguánosti i smanjen"
  467.         " kvalitet zvuka. Zaista Vam preporuàujem da instalirate"
  468.         " verzije fajlova za 68020.\n"
  469.         " Verzija za 68060 izbegava sporo 64-vorobitno deljenje. Nemojte"
  470.         " instalirati ovu verziju ako nemate 68060 procesor!\n\n"
  471.     ))
  472.  
  473.     (set #t_devfiles    "Koje programerske fajlove äelite da instalirate?")
  474.     (set #t_devdocs        "Autodokove i AHI Vodià za programere")
  475.     (set #t_source        "Primeri izvornog koda")
  476.     (set #t_asm        "Include fajlove za asembler")
  477.     (set #t_cgen        "Opãte include fajlove za C")
  478.     (set #t_e        "E module")
  479.     (set #t_fd        "FD fajlove")
  480.     (set #t_ade        "Dodatne ADE gcc include fajlove")
  481.     (set #t_sas        "Dodatne SAS/C (i DICE) include fajlove")
  482.     (set #t_storm        "Dodatne StormC include fajlove")
  483.     (set #t_devfileshelp    (cat
  484.         "Autodokovi i AHI Vodià za programere:\n"
  485.         " Autodokovi i pravila za programiranje AHI-ja.\n\n"
  486.         "Primeri izvornog koda:\n"
  487.         " Neki programi za primer, veáina napisan u C-u, ali ima"
  488.         " i neãto izvornog koda u asembleru.\n\n"
  489.         "Include fajlovi za asembler:\n"
  490.         " Include fajlovi koji su potrebni ako programirate u asembleru.\n\n"
  491.         "Opãti include fajlovi za C:\n"
  492.         " Include fajlovi koji su potrebni ako programirate u C-u.\n\n"
  493.         "E moduli:\n"
  494.         " Moduli za koriãáenje u Amiga E-u.\n\n"
  495.         "FD fajlovi:\n"
  496.         " Mogu se koristiti sa programom 'lvo', ili kada pravite"
  497.         " hardverski drajver napisan u C-u.\n\n"
  498.         "Dodatni ADE gcc include fajlovi:\n"
  499.         " Specijalni include fajlovi za gcc (inline, proto itd.).\n\n"
  500.         "Dodatni SAS/C (i DICE) include fajlovi:\n"
  501.         " Specijalni include fajlovi za SAS/C (pragma, proto itd.)."
  502.         " Rade i sa DCC-om, ali bez poziva tag-ova.\n\n"
  503.         "Dodatni StormC include fajlovi:\n"
  504.         " Specijalni include fajlovi za StormC (pragma, proto itd.).\n\n"
  505.     ))
  506.  
  507.  
  508.     (set #t_nodevs
  509.         "Ne mogu da naâem Devs: asajn. Pokuãajte viãi korisniàki nivo.")
  510.     (set #t_noc
  511.         "Ne mogu da naâem C: asajn. Pokuãajte viãi korisniàki nivo.")
  512.     (set #t_noprefs
  513.         "Ne mogu da naâem Sys:Prefs directory. Pokuãajte viãi korisniàki nivo.")
  514.     (set #t_nol
  515.         "Ne mogu da naâem L: asajn. Pokuãajte viãi korisniàki nivo.")
  516.     (set #t_devspath    "Gde äelite da instalirate sistemske fajlove?")
  517.     (set #t_devspathhelp    (cat
  518.         " Direktorijum koji odaberete mora biti deo Vaãeg Devs: asajna."
  519.         " Installer áe kopirati ahi.device, hardverske drajvere"
  520.         " i fajlove sa opisima audio modova u ovaj direktorijum."
  521.         " Poddirektorijumi za drajvere i fajlove sa opisima modova"
  522.         " áe biti napravljeni.\n\n"
  523.     ))
  524.     (set #t_cpath        "Gde äelite da instalirate AddAudioModes?")
  525.     (set #t_cpathhelp    (cat
  526.         " AddAudioModes je mali CLI program koji se moäe koristiti"
  527.         " za manipulaciju baze podataka koja sadräi audio modove"
  528.         " (vrlo sliàno bazi podataka sa moguáim rezolucijama ekrana)."
  529.         " CLI programi se obiàno nalaze u C: direktorijumu.\n\n"
  530.     ))
  531.  
  532.  
  533.     (set #t_localepath    "Gde äelite da instalirate kataloge?")
  534.     (set #t_localepathhelp    (cat
  535.         " Direktorijum koji odaberete mora biti deo Locale: asajna."
  536.         " Installer áe kopirati kataloge koje odaberete u"
  537.         " poddirektorijume u ovom direktorijumu.\n\n"
  538.     ))
  539.  
  540.     (set #t_prefspath    "Gde äelite da instalirate program za podeãavanja?")
  541.     (set #t_prefspathhelp    (cat
  542.         " Program za podeãavanja Vam omoguáava da podesite AHI vaãoj"
  543.         " konkretnoj konfiguraciji. Moäete odabrati koji zvuàni hardver"
  544.         " äelite da koristite, koje fiziàke ulaze i izlaze äelite da"
  545.         " koritite itd. Programi za podeãavanja se obiàno nalaze u"
  546.         " Sys:Prefs/ direktorijumu.\n"
  547.         " Ovaj program zahteva BGUI biblioteku.\n\n"
  548.     ))
  549.  
  550.     (set #t_audiohelp    (cat
  551.         " AUDIO hendler se koristi za mount-ovanje AUDIO: ureâaja. Kopirajuái"
  552.         " fajlove na i sa ureâaja, moäete puãtati i snimati sirove zvuàne"
  553.         " podatke, IFF-AIFF ili IFF-AIFC fajlove.\n\n"
  554.     ))
  555.  
  556.     (set #t_lpath        "Gde äelite da instalirate AUDIO hendler?")
  557.     (set #t_lpathhelp    (cat
  558.         #t_audiohelp
  559.         " Hendleri se obiàno nalaze u L: direktorijumu.\n\n"
  560.     ))
  561.  
  562.     (set #t_dosdevpath    "Gde äelite da instalirate fajl za mount-ovanje AUDIO hendlera?")
  563.     (set #t_dosdevpathhelp    (cat
  564.         #t_audiohelp
  565.         " Mount fajlovi se nalaze u direktorijumu Devs:DOSDrivers"
  566.         " ako treba da se mount-uju pri dizanju sistema. Ako ne, onda"
  567.         " se verovatno nalaze u SYS:Storage/DOSDrivers direktorijumu.\n\n"
  568.     ))
  569.  
  570.     (set #t_dosdriver    "Da li äelite da hendler bude instaliran pri dizanju sistema?")
  571.     (set #t_dosdriverhelp    (cat
  572.         " Ako äelite, AUDIO: ureâaj moäe biti dostupan àim se digne sistem."
  573.         " Ovo vam omoguáava da ne morate da mount-ujete ureâaj svaki put"
  574.         " kada äelite da ga koristite. Ureâaj ne zahteva mnogo memorije"
  575.         " i zato preporuàujem da da odaberete 'Da'.\n\n"
  576.     ))
  577.  
  578.     (set #t_userdocpath    "Gde äelite da instalirate korisniàku dokumentaciju?")
  579.     (set #t_userdocpathhelp    (cat
  580.         " Ovo je AmigaGuide® fajl koji opisuje AHI audio sistem"
  581.         " i njegove komponente.\n\n"
  582.     ))
  583.  
  584.     (set #t_srcpath        (cat
  585.         " Gde äelite da instalirate primere izvornog koda?"
  586.         " Direktorijum sa imenom AHI biáe napravljen tamo."
  587.     ))
  588.     (set #t_srcpathhelp    (cat
  589.         " Primeri izvornog koda, i u C-u i asembleru, áe biti"
  590.         " stavljeni u poddirektorijum imena AHI. Svi fajlovi koji"
  591.         " se nalaze u AHI direktorijumu áe biti obrisani!\n\n"
  592.     ))
  593.     (set #t_oldsrc        (cat
  594.         " Ovde veá postoji direktorijum imena AHI."
  595.         " Svi fajlovi u njemu áe biti obrisani."
  596.     ))
  597.  
  598.     (set #t_devdocspath    " Gde äelite da stavite dokumentaciju za programere?")
  599.     (set #t_devdocspathhelp    (cat
  600.         " Installer áe staviti autodok fajlove i dokumentaciju za"
  601.         " razvoj AHI-ja direktorijum koji odaberete.\n\n"
  602.     ))
  603.  
  604.     (set #t_aincpath    " Gde se nalaze Vaãi include fajlovi za asembler?")
  605.     (set #t_aincpathhelp    (cat
  606.         " Installer áe smestiti include fajlove za asembler"
  607.         " u poddirektorijume (lvo, devices i libraries)"
  608.         " direktorijuma koji odaberete.\n\n"
  609.     ))
  610.  
  611.     (set #t_fdpath        " Gde dräite Vaãe FD fajlove?")
  612.     (set #t_fdpathhelp    (cat
  613.         " FD fajlovi su fajlovi koji opisuju funkcije biblioteke"
  614.         " i ureâaja. Mogu se koristiti sa programom 'lvo', i"
  615.         " i mogu biti korisni ako piãete hardverske drajvere.\n\n"
  616.     ))
  617.  
  618.     (set #t_cincpath    " Gde se nalaze Vaãi C include fajlovi?")
  619.     (set #t_cincpathhelp    (cat
  620.         " Installer áe smestiti opãte include fajlove za C"
  621.         " u poddirektorijume (clib, devices i libraries)"
  622.         " direktorijuma koji odaberete.\n\n"
  623.     ))
  624.  
  625.     (set #t_emodpath    "  Gde se nalaze Vaãi E modul fajlovi?")
  626.     (set #t_emodpathhhelp    (cat
  627.         " Installer áe smestiti E modul fajlove u direktorijum"
  628.         " i poddirektorijume (devices i libraries)"
  629.         " direktorijuma koji odaberete.\n\n"
  630.     ))
  631.  
  632.     (set #t_adeincpath    " Gde äelite da smestite ADE gcc include fajlove?")
  633.     (set #t_adeincpathhelp    (cat
  634.         " gcc-u trebaju neki dodatni fajlovi da bi naãao koje registre"
  635.         " da koristi pri pozivu AHI funkcija. Te informacije se nalaze"
  636.         " u ovim fajlovima, koji áe biti kopirani u direktorijume "
  637.         " inline, pragmas i proto.\n\n"
  638.     ))
  639.  
  640.     (set #t_sasincpath    " Gde äelite da smestite SAS/C (i DICE) include fajlove?")
  641.     (set #t_sasincpathhelp    (cat
  642.         " SAS/C-u (i DICE-u) trebaju neki dodatni fajlovi da bi naãao"
  643.         " koje registre da koristi pri pozivu AHI funkcija. Te informacije"
  644.         " se nalaze u ovim fajlovima, koji áe biti kopirani u pragmas"
  645.         " i proto direktorijume.\n\n"
  646.     ))
  647.  
  648.     (set #t_stormincpath    " Gde äelite da smestite StormC include fajlove?")
  649.     (set #t_stormincpathhelp (cat
  650.         " StormC-u neki dodatni fajlovi da bi naãao koje registre"
  651.         " da koristi pri pozivu AHI funkcija. Te informacije se nalaze"
  652.         " u ovim fajlovima, koji áe biti kopirani u pragma i proto"
  653.         " direktorijume.\n\n"
  654.     ))
  655.  
  656.     (set #t_ahidevhelp    (cat
  657.         " ahi.device je srce AHI audio"
  658.         " sistema. Ovo je jedini deo za koga"
  659.         " drugi programi znaju.\n\n"
  660.     ))
  661.  
  662.     (set #t_runaddmodes    (cat
  663.         " Upravo startujem AddAudioModes da bih"
  664.         " osveäio bazu audio modova."
  665.     ))
  666.  
  667.  
  668.     (set #t_overwritemode1
  669.         " Veá postoji fajl sa opisom audio moda ")
  670.     (set #t_overwritemode2 " prisutan u ")
  671.     (set #t_overwritemode3    (cat
  672.         ".\n\n"
  673.         " Da li äelite da zapiãem preko njega?"
  674.         " Sve promene koje ste naàinili na njemu biáe izgubljene!"
  675.     ))
  676. ))
  677.  
  678. (if (= @language "suomi")
  679. (    ; Translated by Petteri Kallio <k140734@cs.tut.fi>
  680.     (set #t_welcome        (cat
  681.         " Tervetuloa AHI-asennukseen. AHI on äänijärjestelmä,"
  682.         " jonka avulla saat käyttöösi Amigan standardin äänipiirin"
  683.         " (Paula) lisäksi myös useita varsinaisia äänikortteja."
  684.         " Tämä on AHI:n neljäs (4.) versio."
  685.     ))
  686.     (set #t_oldinstaller    (cat
  687.         " Käytössäsi on Installer-ohjelman vahentunut versio."
  688.         " Voit jatkaa asennusta, mutta asennuksessa saattaa"
  689.         " mennä jotain pieleen. Todennäköisesti tarvitsen"
  690.         " Installer-ohjelman version 43.3 tai uudemman."
  691.         " Haluaisitko kuitenkin jatkaa asennusta?"
  692.     ))
  693.     (set #t_oldinstallerhelp (cat
  694.         " Käyttämäsi Installer-ohjelma on liian vanha versio."
  695.         " Löydät uudemman version vaikkapa Internetistä, esim."
  696.         " Aminetistä, hakemistosta util/misc. Tuoreimman"
  697.         " Installer-ohjelman nimi on  \"Installer-43_3.lha\":\n"
  698.         " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  699.     
  700.     ))
  701.     (set #t_installaborted    "Asennus keskeytetty.")
  702.  
  703.     (set #t_installing    "Asennan... ")
  704.     (set #t_installingdocs    "Asennan kehitysympäristön ohjetiedostoja")
  705.     (set #t_installingincs    "Asennan include-tiedostoja")
  706.     (set #t_installingsrc    "Asennan esimerkkilähdekoodeja")
  707.     (set #t_nofiles        "Ei asennettavia tiedostoja.")
  708.  
  709.     (set #t_nohelp        "Ohjeita ei ole saatavissa.")
  710.  
  711.     (set #t_parts        "Mitkä osat AHI:sta haluat asentaa?")
  712.     (set #t_system        "Järjestelmätiedostot")
  713.     (set #t_prefs        "Asetusohjelma")
  714.     (set #t_audio        "AUDIO-käsittelijä");
  715.     (set #t_userdoc        "Käyttäjän ohjeet")
  716.     (set #t_a-developer    "Sovellusten kehitysympäristön tiedostot")
  717.     (set #t_d-developer    "Ajurien kehitysympäristön tiedostot")
  718.     (set #t_userhelp    (cat
  719.         "Järjestelmätiedostot:\n"
  720.         " Tämä on AHI-äänijärjestelmän sydän."
  721.         " Se täytyy olla asennettuna, ennen kuin AHI:n muut"
  722.         " osat toimivat.\n\n"
  723.         "Asetusohjelma:\n"
  724.         " Asetusohjelmaa käytetään muokkaamaan AHI:n lukuisia asetuksia.\n"
  725.         " Asetusohjelma vaatii, että BGUI on asennettu.\n\n"
  726.         "AUDIO-käsittelijä:\n"
  727.         " Mahdollistaa äänitiedostojen toiston ja tallennuksen"
  728.         " 'copy'-komennon avulla.\n\n"
  729.         "Käyttäjän ohjeet:\n"
  730.         " AmigaGuide®-muotoinen tiedosto, jossa selvitetään"
  731.         " AHI-äänijärjestelmä ja sen eri osat.\n\n"
  732.     ))
  733.     (set #t_devhelp        (cat
  734.         "Sovellusten kehitysympäristön tiedostot:\n"
  735.         " Autodocit, include-tiedostot, esimerkkilähdekoodit jne."
  736.         " Tarpeellisia jos haluat käyttää AHI-äänijärjestelmää"
  737.         " omissa sovellusohjelmissasi.\n\n"
  738.         "Ajurien kehitysympäristön tiedostot:\n"
  739.         " Autodocit, esimerkkilähdekoodit jne. Tarpeellisia ainoastaan"
  740.         " jos aiot tehdä uusia äänikorttiajureita.\n\n"
  741.     ))
  742.  
  743.  
  744.     (set #t_languages    (cat
  745.         "Mille kielille haluat tehdä asennuksen?"
  746.         " Valmiskielenä on englanti."))
  747.     (set #t_languageshelp    (cat
  748.         " Jos oma kielesi ei ole listassa, AHI:n tekijä olisi"
  749.         " mielissään, jos sinä voisit tehdä käännöksen omalle"
  750.         " kielellesi. Käännä tiedostot User/Catalogs/NewCatalog.ct"
  751.         " ja User/Catalogs/NewPrefsCatalog.ct, ja lähetä ne"
  752.         " tähän osoitteeseen:\n"
  753.         " lcs@lysator.liu.se\n\n"
  754.     ))
  755.  
  756.     (set #t_drivers        (cat
  757.         "Mitkä AHI-ajurit haluat asentaa?"
  758.         " Asenna ainoastaan tarvitsemasi ajurit."))
  759.     (set #t_drivershelp    (cat
  760.         "Concierto:\n"
  761.         " Concierto-äänikortti.\n\n"
  762.         "Delfina:\n"
  763.         " Delfina Classic/Lite -äänikortti.\n\n"
  764.         "Filesave:\n"
  765.         " Kirjoita/lue äänitiedosto tiedostoon.\n\n"
  766.         "Maestro Pro:\n"
  767.         " Maestro Pro -äänikortti.\n\n"
  768.         "Melody MPEG:\n"
  769.         " Melody MPEG-äänikortti.\n\n"
  770.         "Paula:\n"
  771.         " Amigan perusäänijärjestelmä.\n\n"
  772.         "Prelude:\n"
  773.         " Prelude-äänikortti.\n\n"
  774.         "Toccata:\n"
  775.         " Toccata-äänikortti.\n\n"
  776.         "Wavetools:\n"
  777.         " Wavetools-äänikortti.\n\n"
  778.     ))
  779.  
  780.     (set #t_CPUver        "Mitkä versiot ohjelmakoodista haluat asentaa?")
  781.     (set #t_CPUverhelp    (cat
  782.         " 68020-prosessorille optimoidut versiot ovat nopeampia ja"
  783.         " usein pienikokoisempia kuin 68000-prosessorille tehdyt"
  784.         " perusversiot. AHI-äänijärjestelmän 68000-versioissa on"
  785.         " vähemmän ominaisuuksia ja huonompi äänenlaatu."
  786.         " 68020-versiot kannattaa asentaa, jos käytössäsi"
  787.         " on vähintään 68020-prosessorilla varustettu kone.\n"
  788.         " 68060-versio välttää hitaita 64-bittisiä jakolaskuja. Älä"
  789.         " asenna tätä versiota ellei sinulla ole 68060-prosessoria!\n\n"
  790.     ))
  791.  
  792.     (set #t_devfiles    "Mitkä kehitysympäristön tiedostot haluat asentaa?")
  793.     (set #t_devdocs        "Autodocit ja AHI-kehitysympäristön ohjeet")
  794.     (set #t_source        "Esimerkkilähdekoodit")
  795.     (set #t_asm        "Assemblerin include-tiedostot")
  796.     (set #t_cgen        "Yleiset C include-tiedostot")
  797.     (set #t_e        "E moduletiedostot")
  798.     (set #t_fd        "FD-tiedostot")
  799.     (set #t_ade        "Ylimääräiset ADE gcc include-tiedostot")
  800.     (set #t_sas        "Ylimääräiset SAS/C (ja DICE) include-tiedostot")
  801.     (set #t_storm        "Ylimääräiset StormC include-tiedostot")
  802.     (set #t_devfileshelp    (cat
  803.         "Autodocit ja AHI-kehitysympäristön ohjeet:\n"
  804.         " AHI:n autodocit ja ohjelmointisäännöt.\n\n"
  805.         "Esimerkkilähdekoodit:\n"
  806.         " Joitain esimerkkiohjelmia, suurin osa C-kielellä, mutta"
  807.         " mukana on myös muutamia assembler-lähdekoodeja.\n\n"
  808.         "Assemblerin include-tiedostot:\n"
  809.         " Include-tiedostot, jotka tarvitset ohjelmoidessasi assemblerilla.\n\n"
  810.         "Yleiset C include-tiedostot:\n"
  811.         " Include-tiedostot, jotka tarvitset ohjelmoidessasi C-kielellä.\n\n"
  812.         "E moduletiedostot:\n"
  813.         " Moduletiedostot, AmigaE-ohjelmointia varten.\n\n"
  814.         "FD-tiedostot:\n"
  815.         " Voidaan käyttää 'lvo'-työkalun kanssa, tai jos teet"
  816.         " laitteistoajurin C-kielellä.\n\n"
  817.         "Ylimääräiset ADE gcc include-tiedostot:\n"
  818.         " Gcc:n erikoisinclude-tiedostot (inline, proto jne).\n\n"
  819.         "Ylimääräiset SAS/C (ja DICE) include-tiedostot:\n"
  820.         " SAS/C:n erikoisinclude-tiedostot (pragma, proto jne)."
  821.         " Toimivat osin myös DCC:n kanssa.\n\n"
  822.         "Ylimääräiset StormC include-tiedostot:\n"
  823.         " StormC:n erikoisinclude-tiedostot (pragma, proto jne).\n\n"
  824.     ))
  825.  
  826.  
  827.     (set #t_nodevs
  828.         "Viitettä Devs: ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
  829.     (set #t_noc
  830.         "Viitettä C: ei löytynyt. Kokeile ylempää kättäjän tasoluokitusta.")
  831.     (set #t_noprefs
  832.         "Hakemistoa Sys:Prefs ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
  833.     (set #t_nol
  834.         "Viitettä L: ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
  835.     (set #t_devspath    "Minne haluat asentaa järjestelmätiedostot?")
  836.     (set #t_devspathhelp    (cat
  837.         " Valitsemaasi hakemistoon tulee olla viite Devs:."
  838.         " Asennusohjelma kopioi ahi.device-tiedoston, laitteistoajurit"
  839.         " ja audiotilojen kuvaustiedostot tähän hakemistoon."
  840.         " Ajureille ja audiotilatiedostoille luodaan alihakemistot.\n\n"
  841.     ))
  842.     (set #t_cpath        "Minne haluat asentaa ohjelman 'AddAudioModes'?")
  843.     (set #t_cpathhelp    (cat
  844.         " AddAudioModes on pieni komentoriviohjelma, jonka avulla"
  845.         " voit muokata audiotiloja sisältävää tietokantaa"
  846.         " (aivan kuten näyttötilojen tietokanta).\n"
  847.         " Komentoriviohjelmat sijaitsevat yleensä hakemistossa C:.\n\n"
  848.     ))
  849.  
  850.  
  851.     (set #t_localepath    "Minne haluat asentaa sanastot?")
  852.     (set #t_localepathhelp    (cat
  853.         " Valitsemaasi hakemistoon tulee olla viite Locale:."
  854.         " Asennusohjelma kopioi valitsemasi sanastot tässä"
  855.         " hakemistossa oleviin alihakemistoihin.\n\n"
  856.     ))
  857.  
  858.     (set #t_prefspath    "Minne haluat asentaa asetusohjelman?")
  859.     (set #t_prefspathhelp    (cat
  860.         " Asetusohjelman avulla voit määrittää AHI-äänijärjestelmän"
  861.         " asetukset. Voit valita haluamasi laitteiston, fyysiset"
  862.         " ulostulot ja sisäänmenot jne. Asetusohjelmat sijaitsevat"
  863.         " normaalisti hakemistossa Sys:Prefs/.\n"
  864.         " Tämä ohjelma vaatii toimiakseen BGUI:n.\n\n"
  865.     ))
  866.  
  867.     (set #t_audiohelp    (cat
  868.         " AUDIO-käsittelijää käytetään kiinnitettäessä laitetta AUDIO:."
  869.         " Kopioimalla tiedostoja tälle laitteelle tai tältä laitteelta"
  870.         " voit toistaa ja tallentaa raakaa äänitietoa, IFF-AIFF- tai"
  871.         " IFF-AIFC-tiedostoja.\n\n"
  872.     ))
  873.  
  874.     (set #t_lpath        "Minne haluat asentaa AUDIO-käsittelijän?")
  875.     (set #t_lpathhelp    (cat
  876.         #t_audiohelp
  877.         " Käsittelijät sijaitsevat yleensä hakemistossa L:.\n\n"
  878.     ))
  879.  
  880.     (set #t_dosdevpath    "Minne haluat asentaa AUDIO-kiinnitystiedoston?")
  881.     (set #t_dosdevpathhelp    (cat
  882.         #t_audiohelp
  883.         " Kiinnitystiedostot sijaitsevat yleensä hakemistossa"
  884.         " Devs:DOSDrivers, jos laitteet kiinnitetään käynnistyksen"
  885.         " yhteydessä. Muutoin kiinnitystiedostot sijaitsevat"
  886.         " varmaankin hakemistossa SYS:Storage/DOSDrivers.\n\n"
  887.     ))
  888.  
  889.     (set #t_dosdriver    "Haluatko kiinnittää laitteen AUDIO: käynnistyksen yhteydessä?")
  890.     (set #t_dosdriverhelp    (cat
  891.         " Jos haluat, laite AUDIO: voidaan kiinnittää käynnistyksen"
  892.         " yhteydessä. Tämä poistaa tarpeen kiinnittää laite erikseen"
  893.         " aina kun haluat käyttää sitä. Kiinnitys ei vie paljoakaan"
  894.         " muistia, joten on suositeltavaa, että valitset 'Kyllä'.\n\n"
  895.     ))
  896.  
  897.     (set #t_userdocpath    "Minne haluat asentaa käyttäjän ohjeet?")
  898.     (set #t_userdocpathhelp    (cat
  899.         " Ohjeet ovat AmigaGuide®-tiedostona, jossa kuvataan"
  900.         " AHI-äänijärjestelmää ja sen osia.\n\n"
  901.     ))
  902.  
  903.     (set #t_srcpath        (cat
  904.         " Minne haluat asentaa esimerkkilähdekoodit?"
  905.         " Valitsemaasi hakemistoon luodaan alihakemisto AHI."
  906.     ))
  907.     (set #t_srcpathhelp    (cat
  908.         " Esimerkkilähdekoodit, sekä C- että assembler-kieliset,"
  909.         " tallennetaan alihakemistoon AHI. Kaikki entiset tiedostot"
  910.         " hakemistossa AHI tuhotaan!\n\n"
  911.     ))
  912.     (set #t_oldsrc        (cat
  913.         " Siellä on jo alihakemisto AHI."
  914.         " Kaikki tiedostot alihakemistossa AHI poistetaan."
  915.     ))
  916.  
  917.     (set #t_devdocspath    " Minne haluat asentaa kehitysympäristön ohjeet?")
  918.     (set #t_devdocspathhelp    (cat
  919.         " Asennusohjelma sijoittaa autodocit ja AHI-kehitysympäristön"
  920.         " ohjeet valitsemaasi hakemistoon.\n\n"
  921.     ))
  922.  
  923.     (set #t_aincpath    " Missä sijaitsevat assemblerisi include-tiedostot?")
  924.     (set #t_aincpathhelp    (cat
  925.         " Asennusohjelma sijoittaa assemblerin include-tiedostot"
  926.         " valitsemasi hakemiston alihakemistoihin (lvo, devices ja"
  927.         " libraries).\n\n"
  928.     ))
  929.  
  930.     (set #t_fdpath        " Missä sijaitsevat FD-tiedostosi?")
  931.     (set #t_fdpathhelp    (cat
  932.         " FD-tiedostot kuvaavat kirjaston tai laitteen toimintoja."
  933.         " Niitä voidaan käyttää 'lvo'-ohjelman kanssa, ja niistä"
  934.         " voi olla hyötyä kirjoittaessasi laitteistoajureita.\n\n"
  935.     ))
  936.  
  937.     (set #t_cincpath    " Missä sijaitsevat C-kääntäjäsi include-tiedostot?")
  938.     (set #t_cincpathhelp    (cat
  939.         " Asennusohjelma sijoittaa yleiset C-kääntäjän include-tiedostot"
  940.         " valitsemasi hakemiston alihakemistoihin (clib, devices"
  941.         " ja libraries).\n\n"
  942.     ))
  943.  
  944.     (set #t_emodpath    " Missä sijaitsevat E moduletiedostosi?")
  945.     (set #t_emodpathhhelp    (cat
  946.         " Asennusohjelma sijoittaa E moduletiedostot valitsemasi"
  947.         " hakemiston alihakemistoihin (devices ja libraries).\n\n"
  948.     ))
  949.  
  950.     (set #t_adeincpath    " Minne haluat sijoittaa ADE gcc include-tiedostot?")
  951.     (set #t_adeincpathhelp    (cat
  952.         " Gcc tarvitsee muutamia ylimääräisiä tiedostoja"
  953.         " tietääkseen mitä rekistereitä voidaan käyttää"
  954.         " kutsuttaessa AHI-funktioita. Tämä tieto on"
  955.         " tiedostoissa, jotka kopioidaan alihakemistoihin"
  956.         " inline, pragmas ja proto.\n\n"
  957.     ))
  958.  
  959.     (set #t_sasincpath    " Minne haluat sijoitta SAS/C (ja DICE) include-tiedostot?")
  960.     (set #t_sasincpathhelp    (cat
  961.         " SAS/C (ja DICE) tarvitsevat muutamia ylimääräisiä"
  962.         " tiedostoja tietääkseen mitä rekistereitä voidaan"
  963.         " käyttää kutsuttaessa AHI-funktioita. Tämä tieto on"
  964.         " tiedostoissa, jotka kopioidaan alihakemistoihin"
  965.         " pragmas ja proto.\n\n"
  966.     ))
  967.  
  968.     (set #t_stormincpath    " Minne haluat sijoittaa StormC include-tiedostot?")
  969.     (set #t_stormincpathhelp (cat
  970.         " StormC tarvitsee muutamia ylimääräisiä tiedostoja"
  971.         " tietääkseen mitä rekistereitä voidaan käyttää"
  972.         " kutsuttaessa AHI-funktioita. Tämä tieto on tiedostoissa,"
  973.         " jotka kopioidaan alihakemistoihin pragma ja proto.\n\n"
  974.     ))
  975.  
  976.     (set #t_ahidevhelp    (cat
  977.         " Ahi.device on AHI-äänijärjestelmän sydän."
  978.         " Tämä on ainoa osa, joka näkyy muille ohjelmille.\n\n"
  979.     ))
  980.  
  981.     (set #t_runaddmodes    (cat
  982.         " Ajan komennon AddAudioModes luodakseni"
  983.         " audiotilatietokannan."
  984.     ))
  985.  
  986.  
  987.     (set #t_overwritemode1
  988.         " Audiotilakuvauksesta on jo olemassa kopio ")
  989.     (set #t_overwritemode2 " tiedostossa ")
  990.     (set #t_overwritemode3    (cat
  991.         ".\n\n"
  992.         " Kirjoitetaanko päälle?"
  993.         " Kaikki audiotilaan tekemäsi muutokset tulevat katoamaan!"
  994.     ))
  995.  
  996. ))
  997.  
  998. (if (= @language "ÃeÓtina")
  999. (    ; Tranlated by Vit Sindlar <sindlarv@hotmail.com>
  1000.  
  1001.     (set #t_welcome        (cat
  1002.         " VÉtejte pÒi instalaci AHI. AHI je pÒesmÅrovatelnÙ"
  1003.         " audio syst×m, kterÙ je moÚno pouÚÉvat jak s vestavÅnÙm"
  1004.         " zvukovÙm Ãipem (Paula), tak i nÅkolika zvukovÙmi kartami."
  1005.         " AktuÁlnÉ verze tohoto software je 4."
  1006.     ))
  1007.     (set #t_oldinstaller    (cat
  1008.         " VlastnÉte starou verzi programu Installer. Tento"
  1009.         " instalaÃnÉ skript pravdÅpodobnÅ vyÚaduje verzi 43.3"
  1010.         " a vyÓÓÉ. Instalace bude pokraÃovat, ale nelze zaruÃit,"
  1011.         " Úe vÓe bude fungovat, tak jak mÁ.\n"
  1012.         " Opravdu si pÒejete pokraÃovat?"
  1013.     ))
  1014.     (set #t_oldinstallerhelp (cat
  1015.         " Verze programu Installer, kterÙ pouÚÉvÁte je pÒÉliÓ"
  1016.           " starÁ. NejnovÅjÓÉ verzi naleznete vÚdy na Internetu,"
  1017.         " napÒ. na Aminetu, v adresÁÒi util/misc. NÁzev archÉvu"
  1018.         " je \"Installer-43_3.lha\":\n"
  1019.         " <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
  1020.  
  1021.     ))
  1022.     (set #t_installaborted    "Instalace byla pÒeruÓena.")
  1023.  
  1024.     (set #t_installing        "ProbÉhÁ instalace ")
  1025.     (set #t_installingdocs    "Instaluje se dokumentace pro vÙvojÁÒe")
  1026.     (set #t_installingincs    "InstalujÉ se includes")
  1027.     (set #t_installingsrc    "InstalujÉ se pÒÉklady zdrojovÙch kÏdÊ")
  1028.     (set #t_nofiles        "Soubory pro instalaci chybÉ.")
  1029.  
  1030.     (set #t_nohelp        "Pro tuto poloÚku nenÉ dostupnÁ nÁpovÅda.")
  1031.  
  1032.     (set #t_parts        "Kter× ÃÁsti AHI si pÒejete nainstalovat?")
  1033.     (set #t_system        "Syst×mov× soubory")
  1034.     (set #t_prefs        "Program pro nastavenÉ")
  1035.     (set #t_audio        "AUDIO handler");
  1036.     (set #t_userdoc        "UÚivatelskÁ dokumentace")
  1037.     (set #t_a-developer    "Soubory pro vÙvojÁÒe programÊ")
  1038.     (set #t_d-developer    "Soubory pro vÙvojÁÒe ovladaÃÊ")
  1039.     (set #t_userhelp    (cat
  1040.         "Syst×mov× soubory:\n"
  1041.         " Syst×mov× soubory - to je vlastnÅ jÁdro cel×ho AHI a musÉ"
  1042.         " bÙt vÚdy nainstalovÁny. Jsou nutn× pro sprÁvnou funkci"
  1043.         " vÓech ostatnÉch komponent.\n\n"
  1044.         "Program pro nastavenÉ:\n"
  1045.         " Program pro nastavenÉ - je pouÚÉvÁn pro pohodln× nastavenÉ"
  1046.         " mnoha voleb AHI. Tato ÃÁst AHI vyÚaduje ke sv× Ãinnosti"
  1047.         " nainstalovanou knihovnu BGUI.library.\n\n"
  1048.         "AUDIO handler:\n"
  1049.         " UmoÚÎuje pÒehrÁvat a zaznamenÁvat samply velice jednoduÓe"
  1050.         " pomocÉ pÒÉkazu 'copy'.\n\n"
  1051.         "UÚivatelskÁ dokumentace:\n"
  1052.         " Dokumentace napsanÁ ve standardnÉm formÁtu AmigaGuide®,"
  1053.         " kterÁ popisuje AHI a ostatnÉ ÃÁsti syst×mu.\n\n"
  1054.     ))
  1055.     (set #t_devhelp        (cat
  1056.         "Soubory pro vÙvojÁÒe programÊ:\n"
  1057.         " Autodocs, includes, pÒÉkladov× zdrojov× kÏdy atd."
  1058.         " Je nutn× nainstalovat pouze v pÒÉpadÅ, Úe budete vyvÉjet"
  1059.         " svÊj vlastnÉ program s podporou AHI.\n\n"
  1060.         "Soubory pro vÙvojÁÒe ovladaÃÊ:\n"
  1061.         " Autodocs, pÒÉkladovÙ zdrojovÙ kÏd atd. Je nutn× pouze"
  1062.         " v pÒÉpadÅ, Úe budete vyvÉjet ovladaÃe pro zvukov× karty.\n\n"
  1063.     ))
  1064.  
  1065.     (set #t_gui        (cat
  1066.         " Kterou z verzÉ programÊ pro nastavenÉ byste si pÒÁli"
  1067.         " nainstalovat?"
  1068.     ))
  1069.     (set #t_guihelp        (cat
  1070.         " Zvolte typ GUI, kter×mu dÁvÁte pÒednost, prosÉm.\n\n"
  1071.     ))
  1072.     (set #t_guibgui        "Verze v BGUI")
  1073.     (set #t_guimui        "Verze v MUI")
  1074.  
  1075.     (set #t_icon         "Kter× ikony si pÒejete nainstalovat?")
  1076.     (set #t_iconstd        "StandardnÉ 4-barevn×")
  1077.     (set #t_iconmwb        "8-barevn× typu MagicWB")
  1078.     (set #t_iconhelp    (cat
  1079.         " Zde si zvolÉte druh ikony, kterou si pÒejete pouÚÉvat pro"
  1080.         " program pro nastavenÉ. Autorem ikony typu MagicWB je Erol Ismael.\n\n"
  1081.     ))
  1082.  
  1083.     (set #t_languages    (cat
  1084.         "KterÙ z jazykÊ si pÒejete nainstalovat?"
  1085.         " StandardnÉ je angliÃtina."))
  1086.     (set #t_languageshelp    (cat
  1087.         " JestliÚe chybÉ zrovna pÒeklad do VaÓeho jazyka, autor AHI"
  1088.         " by VÁs velmi rÁd poÚÁdal o pÒeklad. Upravte a pÒeloÚte"
  1089.         " soubory User/Catalogs/NewCatalog.ct a User/Catalogs/NewPrefsCatalog.ct"
  1090.         " a poÓlete je na tuto adresu:\n"
  1091.         " lcs@lysator.liu.se\n\n"
  1092.         " Je dobr× se nejdÒÉve zeptat autora, zda jiÚ nÅkdo pÒeklad"
  1093.         " do VaÓeho jazyka nedÅlÁ.\n\n"
  1094.  
  1095.     ))
  1096.  
  1097.     (set #t_drivers        (cat
  1098.         "Kter× z ovladaÃÊ AHI si pÒejete nainstalovat?"
  1099.         " Je lepÓÉ si nainstalovat pouze ovladaÃe, kter× skuteÃnÅ potÒebujete."))
  1100.     (set #t_drivershelp    (cat
  1101.         "Concierto:\n"
  1102.         " ZvukovÁ karta Concierto.\n\n"
  1103.         "Delfina:\n"
  1104.         " ZvukovÁ karta Delfina s DSP.\n\n"
  1105.         "Filesave:\n"
  1106.         " UmoÚnÉ ÃtenÉ/zÁpis samplÊ do souboru.\n\n"
  1107.         "Maestro Pro:\n"
  1108.         " ZvukovÁ karta Maestro Pro.\n\n"
  1109.         "Melody MPEG:\n"
  1110.         " ZvukovÁ karta Melody MPEG.\n\n"
  1111.         "Paula:\n"
  1112.         " StandardnÉ zvukovÙ Ãip Amigy.\n\n"
  1113.         "Prelude:\n"
  1114.         " ZvukovÁ karta Prelude.\n\n"
  1115.         "Toccata:\n"
  1116.         " ZvukovÁ karta Toccata.\n\n"
  1117.         "Wavetools:\n"
  1118.         " ZvukovÁ karta Wavetools.\n\n"
  1119.     ))
  1120.  
  1121.     (set #t_CPUver        "Pro jakÙ procesor si pÒejete nainstalovat programy?")
  1122.     (set #t_CPUverhelp        (cat
  1123.         " Programy optimalizovan× pro 68020 a vyÓÓÉ jsou mnohem"
  1124.         " rychlejÓÉ a Ãasto tak× menÓÉ neÚ verze pro obyÃejnou 68000."
  1125.         " NavÉc, v pÒÉpadÅ AHI, majÉ verze pro 68000 m×nÅ funkcÉ"
  1126.         " a pracujÉ s omezenou kvalitou zvuku. SkuteÃnÅ VÁm doporuÃuji"
  1127.         " zvolit pÒi instalaci verze programÊ optimalizovan× pro 68020.\n"
  1128.         " Verze pro 68060 neprovÁdÉ pomalÁ 64-bitovÁ dÅlenÉ. Pokud tedy"
  1129.         " tento procesor nevlastnÉte, neinstalujte ji!\n\n"
  1130.     ))
  1131.  
  1132.     (set #t_devfiles    "Kter× ze souborÊ pro vÙvojÁÒe si pÒejete nainstalovat?")
  1133.     (set #t_devdocs    "Autodocs a dokumentaci pro vÙvojÁÒe k AHI")
  1134.     (set #t_source        "PÒÉkladov× zdrojov× kÏdy")
  1135.     (set #t_asm        "Includes pro assembler")
  1136.     (set #t_cgen        "Includes pro obecn× C")
  1137.     (set #t_e            "Moduly pro E")
  1138.     (set #t_fd        "Soubory FD")
  1139.     (set #t_ade        "Dodatkov× includes pro ADE gcc")
  1140.     (set #t_sas        "Dodatkov× includes pro SAS/C (a DICE)")
  1141.     (set #t_storm        "Dodatkov× includes pro StormC")
  1142.     (set #t_devfileshelp    (cat
  1143.         "Autodocs a dokumentaci pro vÙvojÁÒe k AHI:\n"
  1144.         " Autodocs a pravidla pro programovÁnÉ AHI.\n\n"
  1145.         "PÒÉkladov× zdrojov× kÏdy:\n"
  1146.         " NÅkolik pÒÉkladovÙch programÊ, nejÃastÅji jsou napsÁny v C,"
  1147.         " ale je tam i nÅkolik kouskÊ v assembleru.\n\n"
  1148.         "Includes pro assembler:\n"
  1149.         " Includes, kter× jsou tÒeba pro programovÁnÉ v assembleru.\n\n"
  1150.         "Includes pro obecn× C:\n"
  1151.         " Includes, kter× jsou tÒeba pro programovÁnÉ v C.\n\n"
  1152.         "Moduly pro E:\n"
  1153.         " Moduly, kter× jsou nutn× pro AmigaE.\n\n"
  1154.         "Soubory FD:\n"
  1155.         " Pro pouÚitÉ s programem 'lvo', nebo v pÒÉpadÅ, Úe budete"
  1156.         " psÁt ovladaàpro zvukovou kartu v C.\n\n"
  1157.         "Dodatkov× includes pro ADE gcc:\n"
  1158.         " SpeciÁlnÉ includes pro gcc (inline, proto atd).\n\n"
  1159.         "Dodatkov× includes pro SAS/C (a DICE):\n"
  1160.         " SpeciÁlnÉ includes pro SAS/C (pragmas, proto atd)."
  1161.         " Budou fungovat tak× s DCC, ale bez volÁnÉ tagÊ.\n\n"
  1162.         "Dodatkov× includes pro StormC:\n"
  1163.         " SpeciÁlnÉ includes pro StormC (pragmas, proto atd).\n\n"
  1164.     ))
  1165.  
  1166.  
  1167.     (set #t_nodevs            (cat
  1168.         "Nelze nal×zt pÒiÒazenÉ Devs:. PouÚijte vyÓÓÉ mÏd instalace"
  1169.         " (pro zkuÓenÅjÓÉ uÚivatele)."
  1170.     ))
  1171.     (set #t_noc            (cat
  1172.         "Nelze nal×zt pÒiÒazenÉ C:. PouÚijte vyÓÓÉ mÏd instalace"
  1173.         " (pro zkuÓenÅjÓÉ uÚivatele)."
  1174.     ))
  1175.     (set #t_noprefs        (cat
  1176.         "Nelze nal×zt adresÁÒ Sys:Prefs. PouÚijte vyÓÓÉ mÏd instalace"
  1177.         " (pro zkuÓenÅjÓÉ uÚivatele)."
  1178.     ))
  1179.     (set #t_nol            (cat
  1180.         "Nelze nal×zt pÒiÒazenÉ L:. PouÚijte vyÓÓÉ mÏd instalace"
  1181.         " (pro zkuÓenÅjÓÉ uÚivatele)."
  1182.     ))
  1183.     (set #t_devspath    "Kam si pÒejete nainstalovat syst×mov× soubory?")
  1184.     (set #t_devspathhelp    (cat
  1185.         " AdresÁÒ, kterÙ zvolÉte musÉ bÙt souÃÁstÉ pÒiÒazenÉ Devs:."
  1186.         " PÒi instalaci se tam nakopÉruje ahi.device, ovladaÃe pro"
  1187.         " hardware a soubory pro jednotliv× audio mÏdy."
  1188.         " Pro ovladaÃe a soubory s jednotlivÙmi audio mÏdy budou"
  1189.         " vytvoÒeny podadresÁÒe.\n\n"
  1190.     ))
  1191.     (set #t_cpath        "Kam si pÒejete nainstalovat AddAudioModes?")
  1192.     (set #t_cpathhelp        (cat
  1193.         " AddAudioModes je pÒÉkaz, kterÙ slouÚÉ ke sprÁvÅ databÁze"
  1194.         " audio mÏdÊ (podobnost s databÁzÉ rozliÓovacÉch mÏdÊ je"
  1195.         " ÃistÅ nÁhodnÁ :-). PÒÉkaz by mÅl bÙt normÁlnÅ umÉstÅn"
  1196.         " v pÒiÒazenÉ C:.\n\n"
  1197.     ))
  1198.  
  1199.  
  1200.     (set #t_localepath    "Kam si pÒejete nainstalovat lokalizaÃnÉ katalogy?")
  1201.     (set #t_localepathhelp    (cat
  1202.         " AdresÁÒ, kterÙ zvolÉte musÉ bÙt souÃÁstÉ pÒiÒazenÉ Locale:."
  1203.         " PÒi instalaci se tam nakopÉrujÉ lokalizaÃnÉ katalogy, kter×"
  1204.         " jste si vybrali. PochopitelnÅ budou jednotliv× katalogy"
  1205.         " nakopÉrovÁny do pÒÉsluÓnÙch adresÁÒÊ s danÙm jazykem.\n\n"
  1206.     ))
  1207.  
  1208.     (set #t_prefspath    "Kam si pÒejete nainstalovat program pro nastavenÉ?")
  1209.     (set #t_prefspathhelp    (cat
  1210.         " Program pro nastavenÉ VÁm umoÚnÉ nakonfigurovat AHI pÒesnÅ"
  1211.         " dle moÚnostÉ poÃÉtaÃe. Je zde moÚno nastavit, kterou z ÃÁstÉ"
  1212.         " zvukov×ho hardware si pÒejete pouÚÉvat, jak× vstupy a vÙstupy"
  1213.         " atd. Programy pro nastavenÉ se obvykle nachÁzÉ v adresÁÒi"
  1214.         " SYS:Prefs/.\n"
  1215.         " Tento program vyÚaduje balÉk BGUI nebo MUI, coÚ zÁleÚÉ na"
  1216.         " volbÅ verze programu pro nastavenÉ.\n\n"
  1217.     ))
  1218.  
  1219.     (set #t_audiohelp        (cat
  1220.         " AUDIO handler se pouÚÉvÁ k pÒipojenÉ zaÒÉzenÉ AUDIO:. PouhÙm"
  1221.         " kopÉrovÁnÉm souborÊ z a do tohoto zaÒÉzenÉ je moÚno pÒehrÁvat"
  1222.         " a zaznamenÁvat soubory v RAW, IFF-AIFF nebo IFF-AIFC.\n\n"
  1223.     ))
  1224.  
  1225.     (set #t_lpath        "Kam si pÒejete nainstalovat AUDIO handler?")
  1226.     (set #t_lpathhelp        (cat
  1227.         #t_audiohelp
  1228.         " Handlery jsou obvykle umÉstÅny v pÒiÒazenÉ L:.\n\n"
  1229.     ))
  1230.  
  1231.     (set #t_dosdevpath    "Kam si pÒejete nainstalovat pÒipojovacÉ soubor AUDIO (mount)?")
  1232.     (set #t_dosdevpathhelp    (cat
  1233.         #t_audiohelp
  1234.         " PÒipojovacÉ soubory (mount) jsou obvykle umÉstÅny v adresÁÒi"
  1235.         " Devs:DOSDrivers, v pÒÉpadÅ, Úe si je pÒejete pÒipojovat hned"
  1236.         " po startu. Pokud si to nepÒejete pak by mÅly bÙt pÒesunuty"
  1237.         " do adresÁÒe SYS:Storage/DOSDrivers.\n\n"
  1238.     ))
  1239.  
  1240.     (set #t_dosdriver    "PÒejete si mÉt aktivovÁn AUDIO handler ihned startu?")
  1241.     (set #t_dosdriverhelp    (cat
  1242.         " V pÒÉpadÅ, Úe si to pÒejete, je moÚno nainstalovat AHI tak,"
  1243.         " Úe zaÒÉzenÉ AUDIO: bude aktivnÉ ihned po startu. Tento zpÊsob"
  1244.         " ÓetÒÉ Ãas, kterÙ jinak musÉte vynaloÚit na proklikÁnÉ se do"
  1245.         " SYS:Storage/DOSDrivers, a nevyÚaduje mnoho pamÅti. Z tohoto"
  1246.         " dÊvodu se doporuÃuje odpovÅdÅt 'Ano'.\n\n"
  1247.     ))
  1248.  
  1249.     (set #t_userdocpath    "Kam si pÒejete nainstalovat uÚivatelskou dokumentaci?")
  1250.     (set #t_userdocpathhelp    (cat
  1251.         " Toto je soubor v formÁtu AmigaGuide®, kterÙ popisuje vlastnosti"
  1252.         " audio syst×mu AHI.\n\n"
  1253.     ))
  1254.  
  1255.     (set #t_srcpath        (cat
  1256.         " Kam si pÒejete nainstalovat pÒÉkladov× zdrojov× kÏdy?"
  1257.         " Na tomto mÉstÅ bude vytvoÒen adresÁÒ s nÁzvem AHI."
  1258.     ))
  1259.     (set #t_srcpathhelp        (cat
  1260.         " PÒÉkladov× zdrojov× kÏdy (v jazyce C i assembleru) budou"
  1261.         " uloÚeny v podadresÁÒi nazvan×m AHI. Jak×koliv soubory, kter×"
  1262.         " jsou aktuÁlnÅ uloÚeny v adresÁÒi AHI, budou smazÁny!\n\n"
  1263.     ))
  1264.     (set #t_oldsrc            (cat
  1265.         " Na tomto mÉstÅ jiÚ adresÁÒ AHI existuje."
  1266.         " VÓechny soubory v nÅm budou smazÁny."
  1267.     ))
  1268.  
  1269.     (set #t_devdocspath    " Kam si pÒejete nainstalovat dokumentaci pro vÙvojÁÒe?")
  1270.     (set #t_devdocspathhelp    (cat
  1271.         " Autodocs a dokumentace pro vÙvojÁÒe budou uloÚeny"
  1272.         " do adresÁÒe, kterÙ si zvolÉte.\n\n"
  1273.     ))
  1274.  
  1275.     (set #t_aincpath    " Kde mÁte uloÚen× sv× includes pro assembler?")
  1276.     (set #t_aincpathhelp    (cat
  1277.         " Includes pro assembler budou uloÚeny do svÙch podadresÁÒÊ"
  1278.         " (lvo, devices a libraries) na disku, kterÙ si zvolÉte.\n\n"
  1279.     ))
  1280.  
  1281.     (set #t_fdpath        " Kam si pÒejete uloÚit soubory FD?")
  1282.     (set #t_fdpathhelp        (cat
  1283.         " FD jsou soubory popisujÉcÉ funkce knihoven a zaÒÉzenÉ"
  1284.         " PouÚÉvajÉ se s programem 'lvo' a jsou tak× uÚiteÃn×"
  1285.         " pÒi vytvÁÒenÉ ovladaÃÊ pro hardware.\n\n"
  1286.     ))
  1287.  
  1288.     (set #t_cincpath    " Kde mÁte uloÚen× sv× includes pro C?")
  1289.     (set #t_cincpathhelp    (cat
  1290.         " Includes pro obecn× C budou uloÚeny do svÙch"
  1291.         " podadresÁÒÊ (clib, devices a libraries) na disku, kterÙ"
  1292.         " si zvolÉte.\n\n"
  1293.     ))
  1294.  
  1295.     (set #t_emodpath    " Kde mÁte uloÚen× sv× moduly pro E?")
  1296.     (set #t_emodpathhhelp    (cat
  1297.         " Moduly pro E budou uloÚeny do sv×ho adresÁÒe a jeho"
  1298.         " podadresÁÒÊ (devices a libraries) na disku, kterÙ si"
  1299.         " zvolÉte.\n\n"
  1300.     ))
  1301.  
  1302.     (set #t_adeincpath    " Kam si pÒejete uloÚit includes pro ADE gcc?")
  1303.     (set #t_adeincpathhelp    (cat
  1304.         " gcc potÒebuje extra soubory k tomu, aby si zjistil, kter×"
  1305.         " registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
  1306.         " je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
  1307.         " inline, pragmas a proto.\n\n"
  1308.     ))
  1309.  
  1310.     (set #t_sasincpath    " Kam si pÒejete uloÚit includes pro SAS/C (a DICE)?")
  1311.     (set #t_sasincpathhelp    (cat
  1312.         " SAS/C (a DICE) potÒebuje extra soubory k tomu, aby si zjistil,"
  1313.         " kter× registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
  1314.         " je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
  1315.         " inline, pragmas a proto.\n\n"
  1316.     ))
  1317.  
  1318.     (set #t_stormincpath    " Kam si pÒejete uloÚit includes pro StormC?")
  1319.     (set #t_stormincpathhelp (cat
  1320.         " StormC potÒebuje extra soubory k tomu, aby si zjistil, kter×"
  1321.         " registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
  1322.         " je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
  1323.         " inline, pragmas a proto.\n\n"
  1324.     ))
  1325.  
  1326.     (set #t_ahidevhelp        (cat
  1327.         " ahi.device je jÁdrem cel×ho audio"
  1328.         " syst×mu AHI. Toto je jedinÁ ÃÁst tohoto"
  1329.         " syst×mu, o kter× 'vÉ' ostatnÉ programy.\n\n"
  1330.     ))
  1331.  
  1332.     (set #t_runaddmodes        (cat
  1333.         " Bude spuÓtÅn pÒÉkaz AddAudioModes k tomu,"
  1334.         " aby se obnovila databÁze audio mÏdÊ."
  1335.     ))
  1336.  
  1337.  
  1338.     (set #t_overwritemode1
  1339.         " V tomto adresÁÒi jiÚ soubor s popisem audio mÏdu existuje ")
  1340.     (set #t_overwritemode2 " v ")
  1341.     (set #t_overwritemode3    (cat
  1342.         ".\n\n"
  1343.         " SkuteÃnÅ si to pÒejete pÒepsat?"
  1344.         " VeÓkerÁ zmÅnÅnÁ nastavenÉ budou ztracena!"
  1345.     ))
  1346. ))
  1347.  
  1348. ;(if (= @language "svenska")
  1349. ;(    ; Translated by Your Name <your@email.adr>
  1350. ;))
  1351.  
  1352.  
  1353. ;**
  1354. ;** Procedures
  1355. ;**
  1356.  
  1357. (procedure P_INSTDRIVER #pi_audioname #pi_modename
  1358. (
  1359.     (set #pi_drvpath (tackon #devspath "AHI/"))
  1360.     (set #pi_modepath (tackon #devspath "AudioModes/"))
  1361.     (if (not (exists #pi_drvpath))
  1362.         (makedir #pi_drvpath)
  1363.     )
  1364.     (if (not (exists #pi_modepath))
  1365.         (makedir #pi_modepath)
  1366.     )
  1367.  
  1368.     (if (exists (tackon "User/Devs/AHI" (cat #pi_audioname #ver68k)))
  1369.     (
  1370.         (set #pi_audionamesrc (cat #pi_audioname #ver68k))
  1371.     )
  1372.     (
  1373.         (set #pi_audionamesrc #pi_audioname)
  1374.     ))
  1375.  
  1376.     (copylib
  1377.         (help (cat #t_drivershelp @copylib-help))
  1378.         (prompt (cat #t_installing #pi_drvpath #pi_audionamesrc))
  1379.         (source (tackon "User/Devs/AHI" #pi_audionamesrc))
  1380.         (dest #pi_drvpath)
  1381.         (newname #pi_audioname)
  1382.         (confirm)
  1383.     )
  1384.  
  1385.     (set #pt_copymode 0)
  1386.     (if (exists (tackon #pi_modepath #pi_modename))
  1387.     (if (exists (tackon #pi_modepath #pi_modename))
  1388.     (
  1389. ;        (if (askbool
  1390. ;            (prompt    (cat #t_overwritemode1
  1391. ;                #pi_modename
  1392. ;                #t_overwritemode2
  1393. ;                #pi_drvpath
  1394. ;                #t_overwritemode3
  1395. ;            ))
  1396. ;            (default 1)
  1397. ;            (help #t_drivershelp)
  1398. ;        )
  1399. ;        (
  1400.             (set #pt_copymode 1)
  1401. ;        ))
  1402.     ))
  1403.     ( ; else (exists)
  1404.         (set #pt_copymode 1)
  1405.     ))
  1406.     (if (= #pt_copymode 1)
  1407.     (
  1408.         (copyfiles 
  1409.             (prompt (cat #t_installing #pi_modepath #pi_modename))
  1410.             (source (tackon "User/Devs/AudioModes" #pi_modename))
  1411.             (dest #pi_modepath)
  1412.         )
  1413.     ))
  1414. ))
  1415.  
  1416. (procedure P_INSTCATALOG #pi_language
  1417. (
  1418.     (set #pi_dest (tackon (tackon #localepath "Catalogs") #pi_language))
  1419.     (copyfiles 
  1420.         (prompt (cat #t_installing (tackon #pi_dest #pi_language)))
  1421.         (source (tackon "User/Catalogs" #pi_language))
  1422.         (dest #pi_dest)
  1423.         (all)
  1424.     )
  1425. ))
  1426.  
  1427. ;** 
  1428. ;** Main installation procedure starts here...
  1429. ;**
  1430.  
  1431. (set    #system        1    ;System files
  1432.     #prefs        2    ;Preferences program
  1433.     #audio        4    ;The AHI handler
  1434.     #userdoc    8    ;User documentation
  1435.     #a-developer    16    ;App. programmers developer files
  1436.     #d-developer    32    ;Drv. programmers developer files
  1437. )
  1438. (set    #concierto    1    ;Sound card drivers
  1439.     #delfina    2
  1440.     #filesave    4
  1441.     #maestropro    8
  1442.     #melody        16
  1443.     #paula        32
  1444.     #prelude    64
  1445.     #toccata    128
  1446.     #wavetools    256
  1447. )
  1448.  
  1449. (set    #devdocs    1    ;Autodocs and programming guidelines
  1450.     #source        2    ;Example source code
  1451.     #asm        4    ;Assembler include files
  1452.     #cgen        8    ;Generic C include files
  1453.     #e        16    ;E module files
  1454.     #fd        32    ;FD-files
  1455.     #ade        64    ;ADE gcc include files
  1456.     #sas        128    ;SAS/C include files
  1457.     #storm        256    ;StormC include files
  1458. )
  1459.  
  1460. ;**
  1461. ;** Make sure we're using a recent version of the installer
  1462. ;**
  1463.  
  1464. (if (< @installer-version (+ (* 43 65536) 3))
  1465. (
  1466.     (if (not (askbool
  1467.         (prompt #t_oldinstaller)
  1468.         (help #t_oldinstallerhelp)
  1469.     ))
  1470.     (
  1471.         (abort (cat #t_installaborted "\n\n" #t_oldinstallerhelp))
  1472.     ))
  1473. ))
  1474.  
  1475. ;**
  1476. ;** Welcome!
  1477. ;**
  1478.  
  1479. (welcome #t_welcome)
  1480.  
  1481. ;**
  1482. ;** Find out which parts should be installed
  1483. ;**
  1484.  
  1485. (set #default 0 #helptext "")
  1486. (set #parts 0)
  1487.  
  1488. (if (exists "User")
  1489. (
  1490.     (set #helptext (cat #helptext #t_userhelp))
  1491.     (set #default (bitor #default #system #prefs #audio #userdoc))
  1492. )
  1493. ( ; else
  1494.     (set #t_system "")
  1495.     (set #t_prefs "")
  1496.     (set #t_audio "")
  1497.     (set #t_userdoc "")
  1498.  
  1499. ))
  1500.  
  1501. (if (exists "Developer")
  1502. (
  1503.     (set #helptext (cat #helptext #t_devhelp))
  1504.     (set #default (bitor #default #a-developer #d-developer))
  1505. )
  1506. ( ; else
  1507.     (set #t_a-developer "")
  1508.     (set #t_d-developer "")
  1509. ))
  1510.  
  1511. (if (= #default 0)
  1512.     (abort #t_nofiles)
  1513. )
  1514.  
  1515. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1516.  
  1517. ;**
  1518. ;**  Ask which parts should be installed
  1519. ;**
  1520.  
  1521. (if (= @user-level 0)
  1522. (
  1523.     (set #parts #default)
  1524. )
  1525. ( ; Average or Expert
  1526.     (set #parts (askoptions
  1527.         (prompt #t_parts)
  1528.         (help (cat #helptext @askoptions-help))
  1529.         (choices #t_system #t_prefs #t_audio #t_userdoc #t_a-developer #t_d-developer)
  1530.         (default #default)
  1531.     ))
  1532. ))
  1533.  
  1534. ;**
  1535. ;**  Which GUI system?
  1536. ;**
  1537.  
  1538. (set    #gui_bgui    0    ;Use BGUI
  1539.     #gui_mui    1    ;Use MUI
  1540. )
  1541.  
  1542. (set #gui #gui_bgui)
  1543.  
  1544. (if (bitand #parts #prefs)
  1545.     (set #gui (askchoice
  1546.         (prompt #t_gui)
  1547.         (help (cat #t_guihelp @askchoice-help))
  1548.         (choices #t_guibgui #t_guimui)
  1549.         (default #gui))
  1550.     )
  1551. )    
  1552.  
  1553. (if (= #gui #gui_bgui)
  1554.     (set #prefssrc "AHI_BGUI")
  1555. )
  1556. (if (= #gui #gui_mui)
  1557.     (set #prefssrc "AHI_MUI")
  1558. )
  1559.  
  1560.  
  1561. ;**
  1562. ;**  Which icon?
  1563. ;**
  1564.  
  1565. (set    #icon_std    0
  1566.     #icon_mwb    1
  1567. )
  1568.  
  1569. (set #icon #icon_std)
  1570.  
  1571. (if (<> (getenv "MagicWB") "")
  1572.     (set #icon #icon_mwb)
  1573. )
  1574.  
  1575. (if (bitand #parts (bitor #prefs #audio))
  1576.     (set #icon (askchoice
  1577.         (prompt #t_icon)
  1578.         (help (cat #t_iconhelp @askchoice-help))
  1579.         (choices #t_iconstd #t_iconmwb)
  1580.         (default #icon))
  1581.     )
  1582. )    
  1583.  
  1584.  
  1585. ;**
  1586. ;**  Activate the AUDIO handler at boot time?
  1587. ;**
  1588.  
  1589. (set #dosdevpath    "Devs:DOSDrivers")
  1590.  
  1591. (if (and (bitand #parts #audio) (>= @user-level 1))
  1592.     (if (not (askbool
  1593.         (prompt #t_dosdriver)
  1594.         (help (cat #t_dosdriverhelp @askbool-help))
  1595.         (default 1)))
  1596.     (
  1597.         (set #dosdevpath "SYS:Storage/DOSDrivers")
  1598.     ))
  1599. )
  1600.  
  1601. ;**
  1602. ;**  Ask which languages should be installed
  1603. ;**
  1604.  
  1605. (set    #dansk        1
  1606.     #deutsch    2
  1607.     #español    4
  1608.     #français    8
  1609.     #greek        16
  1610.     #hrvatski    32
  1611.     #íslenska    64
  1612.     #italiano    128
  1613.     #nederlands    256
  1614.     #norsk        512
  1615.     #polski        1024
  1616.     #português    2048
  1617.     #srpski        4096
  1618.     #suomi        8192
  1619.     #svenska    16384
  1620.     #ÃeÓtina    32768
  1621.  
  1622. )
  1623.  
  1624. (set    #t_dansk    "Dansk"
  1625.     #t_deutsch    "Deutsch"
  1626.     #t_español    "Español"
  1627.     #t_français    "Français"
  1628.     #t_greek    "Greek"
  1629.     #t_hrvatski    "Hrvatski"
  1630.     #t_íslenska    "Íslenska"
  1631.     #t_italiano    "Italiano"
  1632.     #t_nederlands    "Nederlands"
  1633.     #t_norsk    "Norsk"
  1634.     #t_polski    "Polski"
  1635.     #t_português    "Português"
  1636.     #t_srpski    "Srpski"
  1637.     #t_suomi    "Suomi"
  1638.     #t_svenska    "Svenska"
  1639.     #t_ÃeÓtina    "ãeÓtina"
  1640. )
  1641.  
  1642.  
  1643. (set    #default 0)
  1644.  
  1645. (if (not (exists "User/Catalogs/dansk"))    (set #t_dansk ""))
  1646. (if (not (exists "User/Catalogs/deutsch"))    (set #t_deutsch ""))
  1647. (if (not (exists "User/Catalogs/español"))    (set #t_español ""))
  1648. (if (not (exists "User/Catalogs/français"))    (set #t_français ""))
  1649. (if (not (exists "User/Catalogs/greek"))    (set #t_greek ""))
  1650. (if (not (exists "User/Catalogs/hrvatski"))    (set #t_hrvatski ""))
  1651. (if (not (exists "User/Catalogs/íslenska"))    (set #t_íslenska ""))
  1652. (if (not (exists "User/Catalogs/italiano"))    (set #t_italiano ""))
  1653. (if (not (exists "User/Catalogs/nederlands"))    (set #t_nederlands ""))
  1654. (if (not (exists "User/Catalogs/norsk"))    (set #t_norsk ""))
  1655. (if (not (exists "User/Catalogs/polski"))    (set #t_polski ""))
  1656. (if (not (exists "User/Catalogs/português"))    (set #t_português ""))
  1657. (if (not (exists "User/Catalogs/srpski"))    (set #t_srpski ""))
  1658. (if (not (exists "User/Catalogs/suomi"))    (set #t_suomi ""))
  1659. (if (not (exists "User/Catalogs/svenska"))    (set #t_svenska ""))
  1660. (if (not (exists "User/Catalogs/ÃeÓtina"))    (set #t_ÃeÓtina ""))
  1661.  
  1662. (if (and (exists "LOCALE:Languages/dansk.language" (noreq)) (not (= #t_dansk "")))
  1663.     (set #default (bitor #default #dansk))
  1664. )
  1665. (if (and (exists "LOCALE:Languages/deutsch.language" (noreq)) (not (= #t_deutsch "")))
  1666.     (set #default (bitor #default #deutsch))
  1667. )
  1668. (if (and (exists "LOCALE:Languages/español.language" (noreq)) (not (= #t_español "")))
  1669.     (set #default (bitor #default #español))
  1670. )
  1671. (if (and (exists "LOCALE:Languages/français.language" (noreq)) (not (= #t_français "")))
  1672.     (set #default (bitor #default #français))
  1673. )
  1674. (if (and (exists "LOCALE:Languages/greek.language" (noreq)) (not (= #t_greek "")))
  1675.     (set #default (bitor #default #greek))
  1676. )
  1677. (if (and (exists "LOCALE:Languages/hrvatski.language" (noreq)) (not (= #t_hrvatski "")))
  1678.     (set #default (bitor #default #hrvatski))
  1679. )
  1680. (if (and (exists "LOCALE:Languages/íslenska.language" (noreq)) (not (= #t_íslenska "")))
  1681.     (set #default (bitor #default #íslenska))
  1682. )
  1683. (if (and (exists "LOCALE:Languages/italiano.language" (noreq)) (not (= #t_italiano "")))
  1684.     (set #default (bitor #default #italiano))
  1685. )
  1686. (if (and (exists "LOCALE:Languages/nederlands.language" (noreq)) (not (= #t_nederlands "")))
  1687.     (set #default (bitor #default #nederlands))
  1688. )
  1689. (if (and (exists "LOCALE:Languages/norsk.language" (noreq)) (not (= #t_norsk "")))
  1690.     (set #default (bitor #default #norsk))
  1691. )
  1692. (if (and (exists "LOCALE:Languages/polski.language" (noreq)) (not (= #t_polski "")))
  1693.     (set #default (bitor #default #polski))
  1694. )
  1695. (if (and (exists "LOCALE:Languages/português.language" (noreq)) (not (= #t_portugues "")))
  1696.     (set #default (bitor #default #portugues))
  1697. )
  1698. (if (and (exists "LOCALE:Languages/srpski.language" (noreq)) (not (= #t_srpski "")))
  1699.     (set #default (bitor #default #srpski))
  1700. )
  1701. (if (and (exists "LOCALE:Languages/suomi.language" (noreq)) (not (= #t_suomi "")))
  1702.     (set #default (bitor #default #suomi))
  1703. )
  1704. (if (and (exists "LOCALE:Languages/svenska.language" (noreq)) (not (= #t_svenska "")))
  1705.     (set #default (bitor #default #svenska))
  1706. )
  1707. (if (and (exists "LOCALE:Languages/ÃeÓtina.language" (noreq)) (not (= #t_ÃeÓtina "")))
  1708.     (set #default (bitor #default #ÃeÓtina))
  1709. )
  1710.  
  1711. (if (bitand #parts (bitor #system #prefs))
  1712.     (if (= @user-level 0)
  1713.     (
  1714.         (set #languages #default)
  1715.     )
  1716.     ( ; Average or Expert
  1717.         (set #languages (askoptions
  1718.             (prompt #t_languages)
  1719.             (help (cat #t_languageshelp @askoptions-help))
  1720.             (choices #t_dansk #t_deutsch  #t_español #t_français
  1721.                      #t_greek #t_hrvatski #t_íslenska #t_italiano #t_nederlands
  1722.                      #t_norsk #t_polski #t_português #t_srpski
  1723.                      #t_suomi #t_svenska #t_ÃeÓtina)
  1724.             (default #default)
  1725.         ))
  1726.     ))
  1727. )
  1728.  
  1729.  
  1730. ;**
  1731. ;** Find out which drivers should be installed (if any)
  1732. ;**
  1733.  
  1734. (set    #default #filesave)
  1735. (set    #drivers 0)
  1736.  
  1737. (if (exists "Libs:concierto.library" (noreq))
  1738.     (set #default (bitor #default #concierto))
  1739. )
  1740. (if (exists "Libs:delfina.library" (noreq))
  1741.     (set #default (bitor #default #delfina))
  1742. )
  1743. (if (<> (database "graphics-mem") 0)            ; Test for not Draco...
  1744.     (set #default (bitor #default #paula))
  1745. )
  1746. (if (exists "Libs:maestix.library" (noreq))
  1747.     (set #default (bitor #default #maestropro))
  1748. )
  1749. (if (exists "Libs:prelude.library" (noreq))
  1750.     (set #default (bitor #default #prelude))
  1751. )
  1752.  
  1753. (if (exists "Libs:toccata.library" (noreq))
  1754.     ; Don't set if emulation library found!
  1755.     (if (< (bitand (getversion "Libs:toccata.library") 65535) 1000)
  1756.         (set #default (bitor #default #toccata))
  1757.     )
  1758. )
  1759. (if (exists "Devs:dad_audio.device" (noreq)) 
  1760.     (set #default (bitor #default #wavetools))
  1761. )
  1762.  
  1763. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1764.  
  1765. (if (bitand #parts #system)
  1766.     (if (= @user-level 0)
  1767.     (
  1768.         (set #drivers #default)
  1769.     )
  1770.     ( ; Average or Expert
  1771.         (set #drivers (askoptions
  1772.             (prompt #t_drivers)
  1773.             (help (cat #t_drivershelp @askoptions-help))
  1774.             (choices "Concierto" "Delfina" "Filesave" "Maestro Pro" "Melody MPEG" "Paula" "Prelude" "Toccata" "Wavetools")
  1775.             (default #default)
  1776.         ))
  1777.     ))
  1778. )
  1779.  
  1780. ;**
  1781. ;**  Install 020-versions of the binaries?
  1782. ;**
  1783.  
  1784. (set #ver68k    "")
  1785. (set #default    1)
  1786.  
  1787. (if (patmatch "68000|68010" (database "cpu"))
  1788. (
  1789.     (set #default 0)
  1790. ))
  1791.  
  1792. (if (patmatch "68060" (database "cpu"))
  1793. (
  1794.     (set #default 2)
  1795. ))
  1796.  
  1797. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1798.  
  1799. (if (and (bitand #parts #system) (>= @user-level 1))
  1800.     (set #default (askchoice
  1801.         (prompt #t_CPUver)
  1802.         (help (cat #t_CPUverhelp @askbool-help))
  1803.         (choices "68000" "68020-68040" "68060")
  1804.         (default #default)))
  1805. )
  1806.  
  1807. (if (= #default 0)
  1808. (
  1809.     (set #ver68k ".000")
  1810. ))
  1811. (if (= #default 2)
  1812. (
  1813.     (set #ver68k ".060")
  1814. ))
  1815.  
  1816.  
  1817. ;**
  1818. ;** Find out which developer files should be installed
  1819. ;**
  1820.  
  1821. (set    #default (bitor #devdocs #source #asm #cgen #fd))
  1822. (set    #devfiles 0)
  1823.  
  1824. (if (exists "ADE:" (noreq))
  1825.     (set #default (bitor #default #ade))
  1826. )
  1827.  
  1828. (if (exists "SC:" (noreq))
  1829.     (set #default (bitor #default #sas))
  1830. )
  1831.  
  1832. (if (exists "STORMC:" (noreq))
  1833.     (set #default (bitor #default #storm))
  1834. )
  1835.  
  1836. (if (exists "EMODULES:" (noreq))
  1837.     (set #default (bitor #default #e))
  1838. )
  1839.  
  1840. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1841.  
  1842. (if (bitand #parts (bitor #a-developer #d-developer))
  1843. (
  1844.     (if (= @user-level 0)
  1845.     (
  1846.         (set #devfiles #default)
  1847.     )
  1848.     ( ; Average or Expert
  1849.         (set #devfiles (askoptions
  1850.             (prompt #t_devfiles)
  1851.             (help (cat #t_devfileshelp @askoptions-help))
  1852.             (choices #t_devdocs #t_source #t_asm #t_cgen #t_e #t_fd #t_ade #t_sas #t_storm )
  1853.             (default #default)
  1854.         ))
  1855.     ))
  1856. ))
  1857.  
  1858. ;**
  1859. ;** Find out where the files should be installed
  1860. ;**
  1861.  
  1862. (set #devspath        "Devs:")
  1863. (set #cpath        "C:")
  1864. (set #prefspath        "SYS:Prefs/")
  1865. (set #lpath        "L:")
  1866. (set #localepath    "Locale:")
  1867.  
  1868. (set #incpath        @default-dest)
  1869. (set #adeincpath    "ADE:include/")
  1870. (set #sasincpath    "Include:")
  1871. (set #stormincpath    "StormC:Include")
  1872. (set #fdpath        "FD:")
  1873. (set #emodpath        "EMODULES:")
  1874.  
  1875. (if (exists #devspath (noreq)) (set #devspath (expandpath #devspath)))
  1876. (if (exists #cpath (noreq)) (set #cpath (expandpath #cpath)))
  1877. (if (exists #prefspath (noreq)) (set #prefspath (expandpath #prefspath)))
  1878. (if (exists #lpath (noreq)) (set #lpath (expandpath #lpath)))
  1879. (if (exists #localepath (noreq)) (set #localepath (expandpath #localepath)))
  1880.  
  1881. (if (not (exists "Help:" (noreq)))
  1882. (
  1883.     (if (bitand #parts #prefs)
  1884.         (set #userdocpath #prefspath)
  1885.         (set #userdocpath @default-dest)
  1886.     )
  1887. )
  1888. (
  1889.     (if (>= #osversion 38)
  1890.     (
  1891.         (set #userdocpath "Help:")
  1892.     ))
  1893. ))
  1894.  
  1895. (if (bitand #devfiles #ade)
  1896. (
  1897.     (set #incpath "ADE:os-include/")
  1898. ))
  1899. (if (exists "Include:" (noreq))
  1900. (
  1901.     (set #incpath "Include:")
  1902. ))
  1903.  
  1904. (if (= @user-level 0)
  1905. (
  1906.     (if (and (bitand #parts #system) (not (exists #devspath (noreq))))
  1907.     (
  1908.         (abort #t_nodevs)
  1909.     ))
  1910.     (if (and (bitand #parts #system) (not (exists #cpath (noreq))))
  1911.     (
  1912.         (abort #t_noc)
  1913.     ))
  1914.     (if (and (bitand #parts #prefs) (not (exists #prefspath (noreq))))
  1915.         (
  1916.         (abort #t_noprefs)
  1917.     ))
  1918.     (if (and (bitand #parts #audio) (not (exists #lpath (noreq))))
  1919.     (
  1920.         (abort #t_nol)
  1921.     ))
  1922.  
  1923.     (set #srcpath (tackon @default-dest "AHI/"))
  1924.     (if (exists #srcpath)
  1925.     (
  1926.         (delete #srcpath
  1927.             (all)
  1928.             (optional "force")
  1929.         )
  1930.     ))
  1931.  
  1932.     (set #devdocspath (tackon #srcpath "docs/"))
  1933.     (if (=     #userdocpath @default-dest)
  1934.     (
  1935.         (set #userdocpath #devdocspath)
  1936.     ))
  1937.     (if (= #incpath @default-dest)
  1938.     (
  1939.         (set #incpath (tackon #srcpath "include/"))
  1940.     ))
  1941.     (set #aincpath #incpath)
  1942.     (set #cincpath #incpath)
  1943.     (if (not (exists #sasincpath (noreq)))
  1944.     (
  1945.         (set #sasincpath #cincpath)
  1946.     ))
  1947.     (if (not (exists #stormincpath (noreq)))
  1948.     (
  1949.         (set #stormincpath #cincpath)
  1950.     ))
  1951.     (if (not (exists #fdpath (noreq)))
  1952.     (
  1953.         (set #fdpath (tackon #incpath "fd/"))
  1954.     ))
  1955.     (if (not (exists #emodpath (noreq)))
  1956.     (
  1957.         (set #emodpath #cincpath)
  1958.     ))
  1959.  
  1960.     (makedir #srcpath (infos))
  1961.     (set @default-dest #srcpath)
  1962.  
  1963. ; Match the number of completes in the 'else' section...
  1964.     (complete (/ #complete 10)) (set #complete (+ #complete (* 15 #completeadd)))
  1965.  
  1966. )
  1967. ( ; Average or Expert
  1968.  
  1969.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1970.  
  1971.     (if (and (bitand #parts #system)
  1972.              (or (not (exists #devspath (noreq))) (= @user-level 2) ))
  1973.     (
  1974.         (set #devspath (askdir 
  1975.             (prompt #t_devspath)
  1976.             (help (cat #t_devspathhelp @askdir-help))
  1977.             (default #devspath)
  1978.         ))
  1979.     ))
  1980.  
  1981.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1982.  
  1983.     (if (and (bitand #parts #system)
  1984.              (or (not (exists #cpath (noreq))) (= @user-level 2) ))
  1985.     (
  1986.         (set #cpath (askdir 
  1987.             (prompt #t_cpath)
  1988.             (help (cat #t_cpathhelp @askdir-help))
  1989.             (default #cpath)
  1990.         ))
  1991.     ))
  1992.  
  1993.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  1994.  
  1995.     (if (and (<> #languages 0)
  1996.              (or (not (exists #localepath (noreq))) (= @user-level 2) ))
  1997.     (
  1998.         (set #localepath (askdir 
  1999.             (prompt #t_localepath)
  2000.             (help (cat #t_localepathhelp @askdir-help))
  2001.             (default #localepath)
  2002.         ))
  2003.     ))
  2004.  
  2005.  
  2006.  
  2007.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2008.  
  2009.     (if (and (bitand #parts #prefs)
  2010.              (or (not (exists #prefspath (noreq))) (= @user-level 2) ))
  2011.     (
  2012.         (set #prefspath (askdir 
  2013.             (prompt #t_prefspath)
  2014.             (help (cat #t_prefspathhelp @askdir-help))
  2015.             (default #prefspath)
  2016.         ))
  2017.     ))
  2018.  
  2019.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2020.  
  2021.     (if (and (bitand #parts #audio)
  2022.              (or (not (exists #lpath (noreq))) (= @user-level 2) ))
  2023.     (
  2024.         (set #lpath (askdir 
  2025.             (prompt #t_lpath)
  2026.             (help (cat #t_lpathhelp @askdir-help))
  2027.             (default #lpath)
  2028.         ))
  2029.     ))
  2030.  
  2031.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2032.  
  2033.     (if (and (bitand #parts #audio)
  2034.              (or (not (exists #dosdevpath (noreq))) (= @user-level 2) ))
  2035.     (
  2036.         (set #dosdevpath (askdir 
  2037.             (prompt #t_dosdevpath)
  2038.             (help (cat #t_dosdevpathhelp @askdir-help))
  2039.             (default #dosdevpath)
  2040.         ))
  2041.     ))
  2042.  
  2043.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2044.  
  2045.     (if (and (bitand #parts #userdoc)
  2046.              (or (= #userdocpath @default-dest) (= @user-level 2) ))
  2047.     (
  2048.         (set #userdocpath (askdir 
  2049.             (prompt #t_userdocpath)
  2050.             (help (cat #t_userdocpathhelp @askdir-help))
  2051.             (default #userdocpath)
  2052.         ))
  2053.     ))
  2054.  
  2055.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2056.  
  2057.     (if (bitand #devfiles #source)
  2058.     (
  2059.         (set #srcpath (askdir 
  2060.             (prompt #t_srcpath)
  2061.             (help (cat #t_srcpathhelp @askdir-help))
  2062.             (default @default-dest)
  2063.         ))
  2064.         (set #srcpath (tackon #srcpath "AHI/"))
  2065.         (if (exists #srcpath)
  2066.         (
  2067.             (delete #srcpath
  2068.                 (all)
  2069.                 (confirm average)
  2070.                 (optional "force")
  2071.                 (prompt #t_oldsrc)
  2072.                 (help #t_nohelp)
  2073.             )
  2074.         ))
  2075.         (makedir #srcpath (infos))
  2076.         (set @default-dest #srcpath)
  2077.     ))
  2078.  
  2079.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2080.  
  2081.     (if (bitand #devfiles #devdocs)
  2082.     (
  2083.         (set #devdocspath (askdir 
  2084.             (prompt #t_devdocspath)
  2085.             (help (cat #t_devdocspathhelp @askdir-help))
  2086.             (default (tackon @default-dest "docs/"))
  2087.             (newpath)
  2088.         ))
  2089.     ))
  2090.  
  2091.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2092.  
  2093.     (if (bitand #devfiles #asm)
  2094.     (
  2095.         (set #aincpath (askdir 
  2096.             (prompt #t_aincpath)
  2097.             (help (cat #t_aincpathhelp @askdir-help))
  2098.             (default #incpath)
  2099.         ))
  2100.  
  2101.     ))
  2102.  
  2103.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2104.  
  2105.     (if (bitand #devfiles #fd)
  2106.     (
  2107.         (if (not (exists #fdpath (noreq)))
  2108.         (
  2109.             (set #fdpath (tackon #incpath "fd/"))
  2110.         ))
  2111.         (set #fdpath (askdir 
  2112.             (prompt #t_fdpath)
  2113.             (help (cat #t_fdpathhelp @askdir-help))
  2114.             (default #fdpath)
  2115.         ))
  2116.     ))
  2117.  
  2118.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2119.  
  2120.     (if (bitand #devfiles #cgen)
  2121.     (
  2122.         (set #cincpath (askdir 
  2123.             (prompt #t_cincpath)
  2124.             (help (cat #t_cincpathhelp @askdir-help))
  2125.             (default #incpath)
  2126.         ))
  2127.     ))
  2128.  
  2129.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2130.  
  2131.     (if (bitand #devfiles #e)
  2132.     (
  2133.         (set #emodpath (askdir 
  2134.             (prompt #t_emodpath)
  2135.             (help (cat #t_emodpathhelp @askdir-help))
  2136.             (default #emodpath)
  2137.         ))
  2138.     ))
  2139.  
  2140.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2141.  
  2142.     (if (bitand #devfiles #ade)
  2143.     (
  2144.         (set #adeincpath (askdir 
  2145.             (prompt #t_adeincpath)
  2146.             (help (cat #t_adeincpathhelp @askdir-help))
  2147.             (default #adeincpath)
  2148.         ))
  2149.     ))
  2150.  
  2151.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2152.  
  2153.     (if (bitand #devfiles #sas)
  2154.     (
  2155.         (set #sasincpath (askdir 
  2156.             (prompt #t_sasincpath)
  2157.             (help (cat #t_sasincpathhelp @askdir-help))
  2158.             (default #sasincpath)
  2159.         ))
  2160.     ))
  2161.  
  2162.     (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2163.  
  2164.     (if (bitand #devfiles #storm)
  2165.     (
  2166.         (set #stormincpath (askdir 
  2167.             (prompt #t_stormincpath)
  2168.             (help (cat #t_stormincpathhelp @askdir-help))
  2169.             (default #stormincpath)
  2170.         ))
  2171.     ))
  2172. ))
  2173.  
  2174.  
  2175. ;******************************************************************************
  2176. ;**** Install *****************************************************************
  2177. ;******************************************************************************
  2178.  
  2179.  
  2180. ;**
  2181. ;** Install the prefs program
  2182. ;**
  2183.  
  2184. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2185. (if (bitand #parts #prefs)
  2186. (
  2187.  
  2188. ; No version checking, so user can change gui version
  2189.  
  2190.     (copyfiles
  2191.         (help (cat #t_prefspathhelp @copylib-help))
  2192.         (prompt #t_installing "AHI")
  2193.         (source (tackon "User/Prefs" #prefssrc))
  2194.         (dest #prefspath)
  2195.         (newname "AHI")
  2196.         (confirm)
  2197.     )
  2198.     (protect (tackon #prefspath "AHI") "+e")
  2199.  
  2200.  
  2201.     (if (= #icon #icon_std)
  2202.         (set #iconsrc "AHI.info")
  2203.     )
  2204.     (if (= #icon #icon_mwb)
  2205.         (set #iconsrc "AHI.MWB.info")
  2206.     )
  2207.  
  2208.     (copyfiles
  2209.         (help (cat #t_prefspathhelp @copylib-help))
  2210.         (prompt #t_installing "AHI")
  2211.         (source (tackon "User/Prefs" #iconsrc))
  2212.         (dest #prefspath)
  2213.         (newname "AHI.info")
  2214.         (confirm)
  2215.         (noposition)
  2216.     )
  2217.  
  2218.     (set @default-dest #prefspath)
  2219. ))
  2220.  
  2221. ;**
  2222. ;** Install the audio handler
  2223. ;**
  2224.  
  2225. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2226. (if (bitand #parts #audio)
  2227. (
  2228.     (copylib
  2229.         (help (cat #t_lpathhelp @copylib-help))
  2230.         (prompt #t_installing "AHI-Handler")
  2231.         (source "User/L/AHI-Handler")
  2232.         (dest #lpath)
  2233.         (confirm)
  2234.     )
  2235.     (protect (tackon #lpath "AHI-Handler") "+e")
  2236.  
  2237.     (copylib
  2238.         (help (cat #t_dosdevpathhelp @copylib-help))
  2239.         (prompt #t_installing "AUDIO")
  2240.         (source "User/Devs/DOSDrivers/AUDIO")
  2241.         (dest #dosdevpath)
  2242.         (confirm)
  2243.     )
  2244.  
  2245.     (if (= #icon #icon_std)
  2246.         (set #iconsrc "AUDIO.info")
  2247.     )
  2248.     (if (= #icon #icon_mwb)
  2249.         (set #iconsrc "AUDIO.MWB.info")
  2250.     )
  2251.  
  2252.     (copyfiles
  2253.         (help (cat #t_dosdevpathhelp @copylib-help))
  2254.         (prompt #t_installing "AUDIO")
  2255.         (source (tackon "User/Devs/DOSDrivers" #iconsrc))
  2256.         (dest #dosdevpath)
  2257.         (newname "AUDIO.info")
  2258.         (confirm)
  2259.         (noposition)
  2260.     )
  2261.  
  2262.     (set @default-dest #lpath)
  2263. ))
  2264.  
  2265. ;**
  2266. ;** Install the user documentation
  2267. ;**
  2268.  
  2269. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2270. (if (bitand #parts #userdoc)
  2271. (
  2272.     (copyfiles
  2273.         (help (cat #t_userdocpathhelp @copylib-help))
  2274.         (prompt #t_installing "ahi.guide")
  2275.         (source "User/Help/ahi.guide")
  2276.         (dest #userdocpath)
  2277.         (infos)
  2278.         (noposition)
  2279.     )
  2280.  
  2281.     (set @default-dest #userdocpath)
  2282. ))
  2283.  
  2284.  
  2285. ;**
  2286. ;** Install ahi.device, AddAudioModes and drivers
  2287. ;**
  2288.  
  2289. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2290. (if (bitand #parts #system)
  2291. (
  2292.  
  2293. ;** ahi.device
  2294.     (copylib
  2295.         (help (cat #t_ahidevhelp @copylib-help))
  2296.         (prompt (cat #t_installing "ahi.device" #ver68k))
  2297.         (source (cat "User/Devs/ahi.device" #ver68k))
  2298.         (dest #devspath)
  2299.         (newname "ahi.device")
  2300.         (confirm)
  2301.     )
  2302.  
  2303. ;** AddAudioModes
  2304.     (copylib
  2305.         (help (cat #t_cpathhelp @copylib-help))
  2306.         (prompt #t_installing "AddAudioModes")
  2307.         (source "User/C/AddAudioModes")
  2308.         (dest #cpath)
  2309.         (confirm)
  2310.     )
  2311.     (protect (tackon #cpath "AddAudioModes") "+e")
  2312.  
  2313. ;** Drivers
  2314.  
  2315.     (if (bitand #drivers #Concierto)
  2316.         (P_INSTDRIVER "concierto.audio" "CONCIERTO")
  2317.     )
  2318.     (if (bitand #drivers #delfina)
  2319.         (P_INSTDRIVER "delfina.audio" "DELFINA")
  2320.     )
  2321.     (if (bitand #drivers #filesave)
  2322.         (P_INSTDRIVER "filesave.audio" "FILESAVE")
  2323.     )
  2324.     (if (bitand #drivers #maestropro)
  2325.         (P_INSTDRIVER "maestropro.audio" "MAESTROPRO")
  2326.     )
  2327.     (if (bitand #drivers #melody)
  2328.         (P_INSTDRIVER "melody.audio" "MELODY")
  2329.     )
  2330.     (if (bitand #drivers #paula)
  2331.         (P_INSTDRIVER "paula.audio" "PAULA")
  2332.     )
  2333.     (if (bitand #drivers #prelude)
  2334.         (P_INSTDRIVER "prelude.audio" "PRELUDE")
  2335.     )
  2336.     (if (bitand #drivers #toccata)
  2337.         (P_INSTDRIVER "toccata.audio" "TOCCATA")
  2338.     )
  2339.     (if (bitand #drivers #wavetools)
  2340.         (P_INSTDRIVER "wavetools.audio" "WAVETOOLS")
  2341.     )
  2342.  
  2343.     (run (cat (tackon #cpath "AddAudioModes") " REMOVE")
  2344.         (prompt #t_runaddmodes)
  2345.         (help #t_nohelp)
  2346.         (confirm)
  2347.     )
  2348.  
  2349.     (set @default-dest #devspath)
  2350. ))
  2351.  
  2352.  
  2353. ;**
  2354. ;** Install the catalogs
  2355. ;**
  2356.  
  2357. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2358. (if (bitand #parts (bitor #system #prefs))
  2359. (
  2360. ;** Catalogs
  2361.     (if (bitand #languages #dansk)
  2362.         (P_INSTCATALOG #t_dansk)
  2363.     )
  2364.     (if (bitand #languages #deutsch)
  2365.         (P_INSTCATALOG #t_deutsch)
  2366.     )
  2367.     (if (bitand #languages #español)
  2368.         (P_INSTCATALOG #t_español)
  2369.     )
  2370.     (if (bitand #languages #français)
  2371.         (P_INSTCATALOG #t_français)
  2372.     )
  2373.     (if (bitand #languages #greek)
  2374.         (P_INSTCATALOG #t_greek)
  2375.     )
  2376.     (if (bitand #languages #hrvatski)
  2377.         (P_INSTCATALOG #t_hrvatski)
  2378.     )
  2379.     (if (bitand #languages #íslenska)
  2380.         (P_INSTCATALOG #t_íslenska)
  2381.     )
  2382.     (if (bitand #languages #italiano)
  2383.         (P_INSTCATALOG #t_italiano)
  2384.     )
  2385.     (if (bitand #languages #nederlands)
  2386.         (P_INSTCATALOG #t_nederlands)
  2387.     )
  2388.     (if (bitand #languages #norsk)
  2389.         (P_INSTCATALOG #t_norsk)
  2390.     )
  2391.     (if (bitand #languages #polski)
  2392.         (P_INSTCATALOG #t_polski)
  2393.     )
  2394.     (if (bitand #languages #português)
  2395.         (P_INSTCATALOG #t_português)
  2396.     )
  2397.     (if (bitand #languages #srpski)
  2398.         (P_INSTCATALOG #t_srpski)
  2399.     )
  2400.     (if (bitand #languages #suomi)
  2401.         (P_INSTCATALOG #t_suomi)
  2402.     )
  2403.     (if (bitand #languages #svenska)
  2404.         (P_INSTCATALOG #t_svenska)
  2405.     )
  2406.     (if (bitand #languages #ÃeÓtina)
  2407.         (P_INSTCATALOG #t_ÃeÓtina)
  2408.     )
  2409. ))
  2410.  
  2411. ;**
  2412. ;** Install the autodocs
  2413. ;**
  2414.  
  2415. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2416. (if (bitand #devfiles #devdocs)
  2417. (
  2418.     (if (bitand #parts #a-developer)
  2419.         (set #pattern "~(#?sub#?)"))
  2420.  
  2421.     (if (bitand #parts #d-developer)
  2422.         (set #pattern "(#?sub#?)"))
  2423.  
  2424.     (if (and (bitand #parts #a-developer) (bitand #parts #d-developer))
  2425.         (set #pattern "#?"))
  2426.  
  2427.     (makedir #devdocspath)
  2428.     (copyfiles
  2429.         (help @copylib-help)
  2430.         (prompt #t_installingdocs )
  2431.         (source "Developer/docs/")
  2432.         (dest #devdocspath)
  2433.         (pattern #pattern)
  2434.         (confirm average)
  2435.         (infos)
  2436.         (noposition)
  2437.     )
  2438.  
  2439.     (set @default-dest #devdocspath)
  2440. ))
  2441.  
  2442. ;**
  2443. ;** Install the include files
  2444. ;**
  2445.  
  2446. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2447. (if (bitand #devfiles #fd)
  2448. (
  2449.     (copyfiles
  2450.         (help @copylib-help)
  2451.         (prompt #t_installingincs)
  2452.         (source "Developer/Include/FD")
  2453.         (dest #fdpath)
  2454.         (all)
  2455.     )
  2456.  
  2457.     (set @default-dest #fdpath)
  2458. ))
  2459.  
  2460. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2461. (if (bitand #devfiles #asm)
  2462. (
  2463.     (copyfiles
  2464.         (help @copylib-help)
  2465.         (prompt #t_installingincs)
  2466.         (source "Developer/include/Asm")
  2467.         (dest #aincpath)
  2468.         (all)
  2469.     )
  2470.     (set @default-dest #aincpath)
  2471. ))
  2472.  
  2473. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2474. (if (bitand #devfiles #cgen)
  2475. (
  2476.     (copyfiles
  2477.         (help @copylib-help)
  2478.         (prompt #t_installingincs)
  2479.         (source "Developer/Include/C")
  2480.         (dest #cincpath)
  2481.         (all)
  2482.     )
  2483.  
  2484.     (set @default-dest #cincpath)
  2485. ))
  2486.  
  2487. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2488. (if (bitand #devfiles #e)
  2489. (
  2490.     (copyfiles
  2491.         (help @copylib-help)
  2492.         (prompt #t_installingincs)
  2493.         (source "Developer/Include/E")
  2494.         (dest #emodpath)
  2495.         (all)
  2496.     )
  2497.  
  2498.     (set @default-dest #emodpath)
  2499. ))
  2500.  
  2501. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2502. (if (bitand #devfiles #ade)
  2503. (
  2504.     (copyfiles
  2505.         (help @copylib-help)
  2506.         (prompt #t_installingincs)
  2507.         (source "Developer/Include/ADE")
  2508.         (dest #adeincpath)
  2509.         (all)
  2510.     )
  2511.  
  2512.     (set @default-dest #adeincpath)
  2513. ))
  2514.  
  2515. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2516. (if (bitand #devfiles #sas)
  2517. (
  2518.     (copyfiles
  2519.         (help @copylib-help)
  2520.         (prompt #t_installingincs)
  2521.         (source "Developer/Include/SAS")
  2522.         (dest #sasincpath)
  2523.         (all)
  2524.     )
  2525.  
  2526.     (set @default-dest #sasincpath)
  2527. ))
  2528.  
  2529. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2530. (if (bitand #devfiles #storm)
  2531. (
  2532.     (copyfiles
  2533.         (help @copylib-help)
  2534.         (prompt #t_installingincs)
  2535.         (source "Developer/Include/Storm")
  2536.         (dest #stormincpath)
  2537.         (all)
  2538.     )
  2539.  
  2540.     (set @default-dest #stormincpath)
  2541. ))
  2542.  
  2543. ;** 
  2544. ;** Install the examples
  2545. ;**
  2546.  
  2547. (complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
  2548. (if (bitand #devfiles #source)
  2549. (
  2550.     (if (bitand #parts #a-developer)
  2551.     (
  2552.         (makedir (tackon #srcpath "examples/"))
  2553.         (copyfiles
  2554.             (help @copylib-help)
  2555.             (prompt #t_installingsrc)
  2556.             (source "Developer/examples")
  2557.             (dest (tackon #srcpath "examples/"))
  2558.             (all)
  2559.         )
  2560.     ))
  2561.     (if (bitand #parts #d-developer)
  2562.     (
  2563.         (makedir (tackon #srcpath "drivers/"))
  2564.         (copyfiles
  2565.             (help @copylib-help)
  2566.             (prompt #t_installingsrc)
  2567.             (source "Developer/drivers")
  2568.             (dest (tackon #srcpath "drivers/"))
  2569.             (all)
  2570.         )
  2571.         (makedir (tackon #srcpath "support/"))
  2572.         (copyfiles
  2573.             (help @copylib-help)
  2574.             (prompt #t_installingsrc)
  2575.             (source "Developer/support")
  2576.             (dest (tackon #srcpath "support/"))
  2577.             (all)
  2578.         )
  2579.     ))
  2580.     (if (bitand #parts (bitor #a-developer #d-developer))
  2581.     (
  2582.         (copyfiles
  2583.             (help @copylib-help)
  2584.             (prompt #t_installingsrc)
  2585.             (source "")
  2586.             (dest #srcpath)
  2587.             (pattern "(COPYRIGHT|HISTORY|VERSION|ahi.readme)#?")
  2588.         )
  2589.     ))
  2590.  
  2591.     (set @default-dest #srcpath)
  2592. ))
  2593.  
  2594.  
  2595.  
  2596.  
  2597. (complete 100)
  2598. (exit)
  2599.